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)


Dogu

Dogu

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.


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

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar