[Resolvido] arredondamento de valores

[ricardosoares1rj 0]

Olá pessoal bom dia, eu gostaria de sber como eu arredondo valores monetários no delphi

por exemplo 8,0625 para 8,06

 

Muito obrigado pessoal

[Maikel Scheid 1]

Olá...

 

Tente usar o FormatFloat e atribua uma máscara de formatação.

 

Coloque um Edit e um Button no formulário e adicione o seguinte código para teste. Digite o valor no Edit.

 

ShowMessage(FormatFloat('###,##0.00', StrToFloat(Edit1.Text)));

Isso deve resolver seu problema

 

Att

[Chrnos 30]

Lembrando que, se trabalhar com valores vindo do banco de dados, é melhor usar uma instrução dentro de um try except para evitar erros caso venha algum valor nulo da base de dados.

 

try
	 Edit1.Text := FormatFloat('###,##0.00', StrToFloat(Query.FieldByName('valor').AsString));
except
	 Edit1.Text := '0,00';
end;

[]'s

[ricardosoares1rj 0]

valeu pessoal, muito obrigado