@DelphiKlaus&Angos
Natürlich habt ihr hier recht, das digitale Speichern von Gleitkommazahlen hat dieses Problem grundsätzlich.
Das Verhalten hier ist aber, daß trotz identischen Typen (alles Double) hier ein unterscheidliches Verhalten/Ergebnis auftritt.
Ich hätte weniger ein Problem wenn dieser DigitaleFehler identisch aufgetreten wäre.
Codegear muss hier ein identisches Verhalten sicherstellen!
Delphi-Quellcode:
// Staedte, p7 : double; // RoundTo(Double,...)
SetRoundMode(rmTruncate);
Staedte := 100.0;
p7:=RoundTo((100.0*0.01),-1); showmessage(floattostr(p7));
p7:=RoundTo((Staedte*0.01),-1); showmessage(floattostr(p7));