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.
|