Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.056 Beiträge
 
Delphi 12 Athens
 
#8

Re: Aus Intensität neue Farbe berechnen

  Alt 14. Okt 2005, 14:48
Zitat von DerDan:
Ich wollt blos mal mekern:

Zitat:
CR:=(CR*Fade+HR*(256-Fade)) div 256;
muss eigendlich:

CR:=(CR*Fade+HR*(255-Fade)) div 255;

lauten, da Fade einen Umfang von 0..255 hat !


mfg

DerDan

Fast richtig

div 256 muß bleiben, da 0 bis 255 = 256.


Code:
CR := (CR * Fade + HR * (25[color=red]5[/color]-Fade)) div 25[color=red]6[/color];
und falls es unbedingt wer will, obwohl es die Codeoptimierung ja auch so ändert ^^
Code:
CR := (CR * Fade + HR * (25[color=red]5[/color]-Fade)) [color=red]shr 8[/color];
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
  Mit Zitat antworten Zitat