Hilfe! mein Scanline ist Kaputt!

[xy124]

Juhuuuuuuuuu ich hab' die Lösung! Danke vor allem dir Blup! das kopieren deines Codes in mein Projekt und dann das "synchronisieren" mit meinem Code brachte die Lösung!

in meinem code fehlten nur 2 zeilen:

Delphi-Quellcode:

procedure vergleichebilder2;
var x,y,d1, d2: integer;
begin
///////////////////////////////
  bmp1.pixelformat:= pf24bit;//an diesen beiden Zeilen liegt's
  bmp2.pixelformat:= pf24bit;//...
///////////////////////////////
  for y:=1 to 239 do begin
    farbe1 := bmp1.ScanLine[y];
    farbe2 := bmp2.ScanLine[y];
.
.
.

komisch das es delphi nicht genügt wenn man das Pixekformat einmal in Formcreate festlegt...


also danke danke danke!