Entwickler-Ecke

Sonstiges (Delphi) - immer abrunden


Chatfix - So 03.11.02 15:27
Titel: immer abrunden
hallo, wie kann ich einen wert immer ABRUNDEN (auf 2 stellen nach dem komma.

mit FloatToStrF rundet er auch auf, was dan abundzu zu falschen ergebnissen meiner weiteren rechnungen führt.
kann ich das abrunden irgendwie erzwingen?


Christian S. - So 03.11.02 15:58

Hi!

Kannst Du das nicht so machen?


Quelltext
1:
TRUNC(a*100)/100;                    


MfG,
Peter


aogwaba - So 03.11.02 16:02

Hi!
such mal in der OH nach Floor.

cu
waba


Michael Stenzel - So 03.11.02 16:02
Titel: Immer abrunden
Eine Abrundung ab der dritten Stelle kann man mit folgender Funktion erreichen.

Quelltext
1:
2:
3:
4:
function Runde(Zahl : Extended) : Extended;
begin
        result := Extended(Trunc(Zahl*100)/100);
end;

Michael :) .


Anonymous - So 03.11.02 16:13

Guck dir auch den Typ Currency an