Fórum Erro com Float #266093

20/01/2005

0

Bom dia

Eu estou tendo um pequeno problema com um campo de valor

Tenho um edit e no evento on exit, tenho o seguinte comando:

[b:1f0075d440]vrcontrato.text:=formatfloat(´#,0.00´,StrToFloat(vrcontrato.text));[/b:1f0075d440]

no caso se eu digitar um valor como 123456789,00 ele ne retorna 123.456.789,00

Até aí, tudo bem. Agora se eu retornar a este campo, na hora que eu saio surge a seguinte mensagem:

[b:1f0075d440]123.456.789,00 is not a floating point value[/b:1f0075d440]

Como posso resolver este problema ?

:D


Arc

Arc

Responder

Posts

20/01/2005

Bico

Bom dia.

Você deve retirar os pontos antes de fazer a conversão:

vrcontrato.text:=formatfloat(´#,0.00´,StrToFloat(StringReplace(vrcontrato.text, ´.´, ´´, [rfReplaceAll])));

Atenciosamente,
Fernando.


Responder

Gostei + 0

20/01/2005

Marcio.theis

Se vc quiser tb existe um componente que faz tudo isto para vc, sendo que não precisa ficar controlando o OnExit e coisa e tal, se quiser o componente pode baixar de:

http://geocities.yahoo.com.br/padodaco/TREdit.zip


Responder

Gostei + 0

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

Aceitar