Formatfloat com problemas

Question

porque n�o consigo fazer o teste abaixo de forma nenhuma vValor:= strtoFloat(E_Dinheiro.Text);          E_Dinheiro.Text := Formatfloat(�R$ #,,0.00 �, vValor);          if E_Dinheiro.Text < Edit6.Te...

Paullsoftware · Answer

tenta formatar assim:Edit_Dinheiro.text := �R$�+FormatFloat(�#,,0.00�,vValor);mais vc deve deixar pra formatar o valor depois do calculo, s� para exibi��o do resultado na tela, pois quando usamos o FormatFloat ele retorna assim: 1 (1,00)......

Macario · Answer

Verifique qual � o separador decimal utilizado!Ponto ou virgula....

Cabelo · Answer

realize os alculos primeiro, e s� no fim voc� formata..

veja nas configura��es regionais que o decimal separator que o micro usa..

sen�o.. mude ele antes de formatar..

decimalseparator := �.�;
formatfloat.......

Massuda · Answer

[quote:82cfec48b8=�DPinho�]porque n�o consigo fazer o teste abaixo de forma nenhuma...a mensagem e sempre que o valor float � invalido[/quote:82cfec48b8]Acredito que o problema esteja ocorrendo na primeira linha que voc� postou, quando tenta converter de string para float. O StrToFloat est� falhando porque voc� est� formatando o Edit para conter o R$. A solu��o seria voc� �desformatar� o valor do edit, ou seja, remover o R$ (e talvez trocar ponto por v�rgula e vice versa).Para formatar o valor monet�rio, d� uma olhada [url=//forum.clubedelphi.net/viewtopic.php?t=65908]neste t�pico[/url]....

Dpinho · Answer

Problema resolvido, tirei a formata��o...Obrigado...

F�rum Formatfloat com problemas #290020