Fórum Depois de FormatFloat como volta p/ Float?? #375550
02/10/2009
0
Tenho alguns TEdit para cálculos. Aplico FormatFloat para dar o fomato dos pontos e virgulas. Depois para fazer o cálculo preciso que valor volte a ser Float, mas aí dá um erro dizendo valor inválido para ser float!
valor := 4.379,32;
texto := FormatFloat(´#,0.00´, Valor);
ERRO ACONTECE AQUI:
valor := StrToFloat(texto);
First chance exception at $7C81EB33. Exception class EConvertError with message ´´4.379,32´ is not a valid floating point value´. Process VendasConectiva.exe (1372)
valor := 4.379,32;
texto := FormatFloat(´#,0.00´, Valor);
ERRO ACONTECE AQUI:
valor := StrToFloat(texto);
First chance exception at $7C81EB33. Exception class EConvertError with message ´´4.379,32´ is not a valid floating point value´. Process VendasConectiva.exe (1372)
Dogu
Curtir tópico
+ 0
Responder
Posts
02/10/2009
Dbart
coloca isso
texto := StringReplace(texto,´.´,´´, [rfReplaceAll]);
esse erro acontece por causa do ponto
Stringreplace retira o ponto da string.
texto := StringReplace(texto,´.´,´´, [rfReplaceAll]);
esse erro acontece por causa do ponto
Stringreplace retira o ponto da string.
Responder
Gostei + 0
03/10/2009
Dogu
Obrigado, salvou-me de dores de cabeça! Por que o Delphi não é tão compreensivo quanto Ruby? Seria tão mais fácil entender e organizado!!!
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)