Thema: Delphi Delphi & Runden

Einzelnen Beitrag anzeigen

brechi

Registriert seit: 30. Jan 2004
823 Beiträge
 
#7

Re: Delphi & Runden

  Alt 15. Sep 2009, 16:12
Korrektur:

Die Delphi Funktion ROUND rundet immer mit rmNearest.
Die Delphi Funktion math.RoundTo rundet mit dem RoundMode.

-> Trunc(RoundTo(2.5,0)) liefert:
rmNearest: 2
rmDown: 2
rmUp: 3
rmTruncate: 2

wobei rmNearest eben Bankers Round ist.

Das Problem ist jetzt: Format benutzt immer den wissenschaftlichen modus bei Format('%5.0f',[2.5]) kommt 3 raus. Bei der Zuweisung eines Variants in einer Tabelle wird aber der Bankers Round-Mode verwendet (und liefert 2) bei BCD 5.1.

Ich will aber jetzt IMMER, sowohl bei Format als auch in TTable (und am liebsten auch in Round) den Wert 3 rausbekommen.
  Mit Zitat antworten Zitat