Função de Arredondamento

Delphi

07/06/2004

Bom dia, preciso de uma função que me permita fazer um arrdeondamento de um valor float a x casas décimais.

A função deveria ser do género : arredonda(Valor, CasasDecimais)

Exemplo arrendonda(1.585,2) o result seria 1.59

Obrigado


Aborges

Aborges

Curtidas 0

Respostas

Cebikyn

Cebikyn

07/06/2004

Verifique a função [b:206f7b27e7]RoundN[/b:206f7b27e7], nete tópico:

http://delphiforum.icft.com.br/forum/viewtopic.php?p=80525#80525


GOSTEI 0
Emerson Nascimento

Emerson Nascimento

07/06/2004

No Delphi existe a função RoundTo() na unit Math.


GOSTEI 0
Xisto

Xisto

07/06/2004

Var
  VARIAVEL : Double;
Begin
  VARIAVEL := 1.988776655443;
  VARIAVEL := StrToFloat(FormatFloat(´#0.00´,VARIAVEL));
  // Resultato VARIAVEL = 1.99
end;


Meio feio, mas funciona perfeitamente. E olha que este negocio de arredondamento enche !


GOSTEI 0
POSTAR