Ich weiß nicht, inwiefern das bei der von dir benützten Komponente unterstützt wird, aber sofern du einen Pointer zu den Pixeln holen kannst, ist der Rest doch ein Klax, oder?
Falls das mit Scanline klappt, hier mal ein Beispiel:
Delphi-Quellcode:
{ !ungetestet! }
var
Channel: PWord;
i: Integer;
r, g, b: Word;
begin
Channel := <ImageKomponente>.Scanline[<ImageKomponente>.Height-1];
for i := 0 to <ImageKomponente>.Height * <ImageKomponente>.Width - 1 do
begin
r := Channel^;
inc( Channel );
g := Channel^;
inc( Channel );
b := Channel^;
inc( Channel );
end;
end;