ja anscheind hast du recht
ich war mal wieder zu voreilig.
ich habe es jetzt so gemacht und es geht auch
Delphi-Quellcode:
lPixel := Bmp.ScanLine[i]; // Zeiger auf die Zeile holen
for j := 0 to Bmp.Width - 1 do
begin
MeinArray[Zeile, (j*3)] := lPixel.rgbBlue;
MeinArray[Zeile, (j*3)+1] := lPixel.rgbGreen;
MeinArray[Zeile, (j*3)+2] := lPixel.rgbRed;
Inc(lPixel); // auf zum nächsten Pixel
end;
Danke.
Alex