|
Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.149 Beiträge
Delphi 12 Athens
|
Re: Delphi & Runden
16. Sep 2009, 11:30
gerundetesErgebniss := (Zahl1 + (Zahl2 div 2)) div Zahl2;
Aber das Löst ja nicht das Problem hier ... vorallem nicht vei den Variants, wo intern gerundet wird.
Eventuell könnte man da die internen Funktionen der Variants hooken und dort seine eigene Roundmethode einschleusen.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher. 
 my Delphi wish list : BugReports/FeatureRequests
|