Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   respetar cero de la derecha (https://www.clubdelphi.com/foros/showthread.php?t=68233)

Aprendiendo 02-06-2010 14:43:22

respetar cero de la derecha
 
Hola a tod@s,

Resulta que para un proceso en especial necesito pasar de float a string, este proceso lo realizo sin problemas, el problema viene cuando el valor del campo float termina por ejemplo en 80: 377,80

El proceso de conversión lo realizo mediante "edit1.text := floattostr(querycampo.value);" y me lo deja en '377,8'

Al pasar a string pierdo el cero de la derecha, ¿como podría hacer esto para respetar ese valor y se pase todo tal cual?.

Esperando una pronta respuesta, reciban un cordial saludo...

marcoszorrilla 02-06-2010 14:53:57

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
xx: Double;
begin
xx:=333.9;
edit1.Text:=FormatFloat(',0.00',xx);
end;

Un Saludo.


La franja horaria es GMT +2. Ahora son las 05:09:31.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi