|
Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.196 Beiträge
Delphi 12 Athens
|
AW: Rundungs problem?
1. Jun 2017, 17:49
AlphaCoef ist ein gerundetes Zwischenergebnis.
Bei 16 ist das natürlich größer und somit die Rundung geringer.
Aber die Rundung ist dennoch bei 8 und 16 drin, nur eben nicht gleich groß.
pBits.rgbBlue := (pBits.rgbBlue * 255) div pBits.rgbReserved;
= pBits.rgbBlue := MulDiv(pBits.rgbBlue, 255, pBits.rgbReserved);
aber da deine Werte so klein sind, dass es keinen Überlauf gibt, wäre MulDiv egal (unnötig).
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher. 
 my Delphi wish list : BugReports/FeatureRequests
Geändert von himitsu ( 1. Jun 2017 um 17:55 Uhr)
|