Delphi-Quellcode:
TfrmDraw =
class(TForm)
PicFlame0: TImage;
BitBlt(
DC, k - 1, trunc(Abs(63 - TRA[k])), 1, 63, PicFlame0.Canvas.Handle, 0, 0, SRCCOPY);
PicFlame0.Canvas.Handle
verursacht ein
AV ? Noch nie erlebt sowas.
wenn ich es so übergebe funktioniert es
Delphi-Quellcode:
DC2 := PicFlame0.Canvas.Handle;
BitBlt(
DC, k - 1, trunc(Abs(63 - TRA[k])), 1, 63, DC2 , 0, 0, SRCCOPY);
was ist das denn für ein trick
Das Bitmap ist 1 Pixel in der weite und 64 Pixel hoch.
gruss EMil