Zitat von
himitsu:
Delphi-Quellcode:
//gekürzt und geändert
Rot3 := (Rot1 xor Rot2) and $FF;
Hab das mal schnell im Kopf optimiert. Also nicht getestet.
Das berechnet pro Pixel für jede Grundfarbe (Rot/Grün/Blau) die Farbdifferenz.
Rot3 := ABS(Rot1 - Rot2); Hi himitsu, bei mir ist aber obdA
($08 xor $01) <> abs($08 - $01) // $09 <> $07
Oder habe ich einen Denkfehler?