Convertir una cadena

[Ganduke]

Muchas gracias por responder tan rapido pero sigue fallando
pvp2:=StrToFloat(listbox3.Items[n]); // en listbox es de donde cogo el valor pero sigue diciendo lo mismo.

[[Bicho]]

Lo siento, no lo veo.

Puedes poner una parte del código para que podamos esclarecer que está ocurriendo??

Seguro que te aparece el mismo error de "Is not a valid integer value"??

Saludos

[Ganduke]

Bueno si me da el error en vez de Int es Float, pero te comento
Lo mismo es que no declaro bien las variables??

Var
linea, opcion:string;
n,z: integer;
pvp2:double;
dto,pvpdto,pvp:real;
Begin
pvp2:=StrToFloat(listbox3.Items[n]);
y aqui es donde da el error.

Tambien te comento que puse directamente pvp2:=StrToFloat('00000008.30')
y me sigue dando el error
EConvertError with message "00000008.30" is not a valid floating point value.
Muchas gracias por ayudarme.

[[Bicho]]

Gracias Ganduke, ahora ya lo veo.

Declarar pvp2 como Double no está mal, pero puedes declararlo simplemente como Float.
El problema te lo está dando ahora porque la cadena contiene un '.' y no puede convertirlo para que sea un número. Es decir necesita que el string no contenga un punto, sino una coma.

Lo que puedes hacer es usar cualquiera de las funciones que tiene Delphi para substituir carácteres en una cadena. Yo a bote pronto he probado la funcion AnsiReplaceStr que está en la unit StrUtils

Y al final tu código quedaria de la siguiente manera:

Código Delphi [-]
  pvp2:=StrToFloat(AnsiReplaceStr(listbox3.Items[n], '.', ','));

Espero que así ya te sirva.

Saludos

[Ganduke]

Muchisimas gracias ya me funciona. Repito Muchas Gracias.