Fórum Formatação #151311

[quote:50905ddf55=´C-T´]Galera ..Estou com esse problema .. qdo o valor do edit passa de 1.000,00
da um erro de ponto flutuante ..
... Qual tipo de dado devo usar ? minha rotina é essa


Var
ValorSomado,ValorTotal:Currency;
Resultado:String;
begin
If Trim(Edit_ValorTotal2.Text) <> ´´ Then
Begin
ValorTotal:=StrToCurr(Edit1.Text);
ValorSomado:=StrToCurr(Edit_ValorTotal2.Text);
Edit1.Text:=(FormatCurr(´#,0.00´,(ValorSomado + Valortotal)));
End
Else
Edit_Cod2.SetFocus;
end;

Tentei usar o Strtofloat mas tbem nada ..[/quote:50905ddf55]


que tal mudar o tipo das variaveis para real
ValorSomado,ValorTotal:real;

CARA OBRIGADO!!! PELA AJUDA .