Wenn du PixelLine ersetzen willst, musst du dementsprechend PColor32EntryArray nutzen. Da TColor32 und TColor32Entry gleich groß sind, kannst du das Ergebnis von Scanline ohne Probleme casten.

Zitat von
alienous:
hab mir lighten angesehn und verstehe überhaupt nix, wüsste nicht wie ich das da einbauen könnte

So groß ist die Funktion nun auch wieder nicht

.
Delphi-Quellcode:
// Extraktion der Kanalwerte aus einem TColor32-Wert
a := C shr 24;
r := C and $00FF0000;
g := C and $0000FF00;
b := C and $000000FF;