Ver Mensaje Individual
  #1  
Antiguo 06-03-2011
gdlrinfo gdlrinfo is offline
Miembro
 
Registrado: may 2007
Posts: 131
Reputación: 20
gdlrinfo Va por buen camino
Suma de datos Float error

Hola amigos tengo el siguiente problema necesito sumar dos numeros del siguiente formato 12.000.154,00 + 00.152.440,00 los datos los cargo en ese formato con un MaskEdit necesito que no me borre ningun cero despues de la suma pero me tira un error al hacer la suma el error is not valid floating point value

Código Delphi [-]
procedure TFPrincipal.Button2Click(Sender: TObject);
var
 n:real;
begin
  n:=0;
  datos.First;
  while datos.Eof=false do
    begin
      N:= n+strtofloat(datos.FieldValues['importe']);
      datos.Next;
      end;
    label29.Caption:=floattostr(n);

Desde ya muchas gracias espero su respuesta
Responder Con Cita