Arredondamento de float

[papaicleber]

:rolleyes:

Olá pessoal,

Estou desenvolvendo um sistema, e nele preciso fazer calculo do tipo 3,0769, porem o delphi está calculando esses campos arredondados.

alguém sabe me dizer como posso fazer para calcular com mais casas decimais?

Obrigado a todos

Cleber

:wacko:

[Jhonas]

exemplo:

procedure TForm1.Button1Click(Sender: TObject);

var x , y , z : real;

begin

x := 2.456;

y := 3.467;

z := strtofloat(formatfloat(',0.00000',x / y));

Edit1.Text := floattostr(z);

end;

abraço

[papaicleber]

exemplo:

procedure TForm1.Button1Click(Sender: TObject);

var x , y , z : real;

begin

x := 2.456;

y := 3.467;

z := strtofloat(formatfloat(',0.00000',x / y));

Edit1.Text := floattostr(z);

end;

abraço

Desculpe amigo, ou eu sou muito tanso,....

mas ainda está arredondando no segundo digito.

EX: 3,045

ele faz 3,05

e preciso que ele reaomente fique 3,045.

Não sei se fio claro.

Abraços

[Jhonas]

sem o seu código, realmente não tem como saber

abraço