Einzelnen Beitrag anzeigen

Benutzerbild von edosoft
edosoft

Registriert seit: 27. Okt 2003
Ort: Wehingen
258 Beiträge
 
Turbo Delphi für Win32
 
#1

Runden mit RoundTo geht irgendwie nicht^^

  Alt 27. Apr 2008, 14:06
Hallo,

ich will extended-werte auf 4 dezimalstellen genau runden. dazu verwende ich bisher die funktion "RoundTo". aber irgendie funktioniert das nicht...

Delphi-Quellcode:
ShowMessage(FloatToStr(RoundTo(1.23545, -4))); //1,2354
ShowMessage(FloatToStr(RoundTo(1.23555, -4))); //1,2355
ShowMessage(FloatToStr(RoundTo(1.23556, -4))); //1,2356
spinn' ich jetzt oder rundet mir die RoundTo-Funktion nicht richtig?
simpleroundto() hatte übrigens das selbe ergebnis... sollte ich eine andere funktion zum runden verwenden?

danke!

-dominik
Dominik Weber
www.edo-soft.com
  Mit Zitat antworten Zitat