Buenas tardes chicos:
Hace mucho tiempo puse un problema aquí pero al final no conseguí solucionarlo y salté a otra cosa porque era un proyecto pequeño, ahora me vuelve a saltar y ya no se que hacer.
Resulta que tengo un string que es un valor sin coma (155) y otro con coma (110,2), necesito pasarlo a número para poder tratarlos, hago lo siguiente:
Código Delphi
[-]
var
cad1,cad2: string;
valor1, valor2: double;
cad1:= '100';
cad2:= '105,5';
valor1:= strtofloat(cad1);
valor2:= strtofloat(cad2);
En realidad los valores string me vienen de datos que cojo de un fichero, os lo pongo así para simplificarlo.
Voy depurando paso por paso y cad1 y cad2 llevan bien el valor, pero al pasarlos a valor1 y valor2, las dos variables double pone 0, no consigo que coja el número.
No arroja ningún error, todo funciona sin errores pero los valores de valor1 y valor2 pone 0.
Estoy usando delphi 10 y ya no se que hacer, no entiendo que pasa, en delphi 7 funciona perfectamente.
He probado con variables extended y las deja a 0 igual, he probado también con variables currency y usar strtocurr pero también lo deja a 0.
Hay alguna otra forma de hacerlo? me estoy volviendo loco, necesito que sean double para calcular cosas con esos datos, iva y cosas así.
Muchas gracias.