Zitat von
Sunlight7:
PPS: Kann mal wer probieren, ob diese Funktion in neueren Delphi Versionen auch nen internen Fehler verursacht?!
Delphi-Quellcode:
function GetPixel(Bitmap:TBitmap;
const x, y:Integer):LongInt;
var sl:PByteArray;
begin
sl:=Bitmap.ScanLine[y];
Result:=
RGB(sl[(x * 3)+2],
sl[(x * 3)+1],
sl[(x * 3)+0]);
end;
Zitat von
Delphi 5.0 Compiler:
interner Fehler C1569
Das hat mich was genervt...
das ist jetzt mehr oder weniger ins Blaue getippt, aber könnte das vielleicht eher etwas mit dem Bitmap-Format zu tun haben?
Außerdem bin ich mir nicht sicher, ob Scanline in diesem Falle tatsächlich schneller ist als Canvas.Pixels
