Runden mit RoundTo und SipleRoundTo

[Tazidus]

Hallo,

in DElphi gibt es zwei Rundungsfunktionen, die mich interessieren.

Einmal das "Bankers Rounding" und einmal das "kaufmännische".

Beim RoundTo steht in der Hilfe:

RoundTo(1.235,2) = 1,24
RoundTo(1.245,2) = 1,24

Von der theorie her auch richtig. So sollte es bei "Bankers Rounding" auch sein.
Genau das brauche ich auch, nur bei mir sieht es so aus:

RoundTo(1.235,2) = 1,24
RoundTo(1.245,2) = 1,25

Und dies verstehe ich nicht. Diese Ausgabe ähnelt dem Runden mit "SimpleRoundTo".


Kann mir einer dieses Verhalten erklären bzw. sagen was ich einstellen uss, dait mein Delphi so rundet wie in der Hilfe steht?

Freue mich

Gruß
Daniel

[zecke]

In der Hilfe steht auch etwas von SetRoundMode. Schau dir das mal an.

[RavenIV]

Zitat von Tazidus:

Von der theorie her auch richtig. So sollte es bei "Bankers Rounding" auch sein.
Genau das brauche ich auch, nur bei mir sieht es so aus:

RoundTo(1.235,2) = 1,24
RoundTo(1.245,2) = 1,25

In der Delphi-Hilfe (D7 und D2007) steht vor der zwei nach dem Komma ein Minuszeichen.
Also so:
RoundTo(1,235, -2) 1.24
RoundTo(1,245, -2) 1.24

Vielleucht kommt dann das raus, was Du erwartest?

[Tazidus]

Hallo,

es steht in der Hilfe wirklich eine "-2" da.
In meinem Programm aber auch.

Un es passiert nicht das, was methematisches Runden oder "Bankers Rounding" heißt, nämlich das Runden zur nächsten geraden Zahl.

Wenn man RoundTo (1.235,-2) nimmt, sollte 1.24 rausßkommen - soweit auch OK
aber bei RoundTo (1.245,-2) müsste 1.24 rauskommen. Bei mir aber nicht -> (1.25).

Und mit SetRoundMode habe ich es auch versucht, funktioniert wie beschrieben, hilft aber bei meinem Problem nicht weiter.

Was ist bei mir los. Warum rundet Delphi nicht so wie in der Hilfe beschrieben?

[RavenIV]

Zitat von Tazidus:

Was ist bei mir los. Warum rundet Delphi nicht so wie in der Hilfe beschrieben?

Vielleicht weil die Hilfe falsch ist?
Und eigentlich macht es auch keinen Sinn, so wie es in der Hilfe steht...