Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Inversa de FormatFloat (https://www.clubdelphi.com/foros/showthread.php?t=59709)

MaMu 05-09-2008 13:28:36

Inversa de FormatFloat
 
Con FormatFloat, yo paso como cadena un Float con la máscara que yo quiero, pero como hago el proceso inverso? es decir, teniendo por ejemplo:

$ 4,500.88.-

como puedo pasarlo a Float??

Código Delphi [-]
 
Function FormatToFloat(Cadena:String):Float (o Currency);
begin
  // ????
end;

Saludos y Gracias

BlueSteel 05-09-2008 14:55:05

Hola MaMu

Si lo que necesitas es pasarlo a un Edit, te sugiero que utilices el componente JvValidateEdit de la JVC (jedi)...

con el puedes hacer lo que necesitas, ya que solo tienes que usar el atributo del componente que necesites...

Código Delphi [-]
JvValidateValor.AsCurrency
JvValidateValor.AsFloat
JvValidateValor.Texto

si tienes $ 4,500.88 y sabes que es Currency, lo pasas así

Código Delphi [-]
JvValidateValor.AsCurrency := $ 4,500.88;

y para leerlo como float solo tienes que hacer referencia a la parte float así

Código Delphi [-]
Valor:= JvValidateValor.AsFloat
;

Espero que esto te sirva...

Salu2


La franja horaria es GMT +2. Ahora son las 10:11:58.

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