Sooooo.......
damit die die diesen Beitrag lesen stelle ich hiermit die Lösung meines Problems nochmal kurz dar:
Damit man gut und schnell zeichnen kann:
das muss man irgendwann am anfang, ambesten im oncreate schreiben:
form1.DoubleBuffered:=true;
Dann zeichnet man das Bild anstand direkt auf form1.canvas auf ein TBitmap. Also bild.canvas.
Dann kann man mit
BitBlt(form1.Canvas.Handle,0,0,bild.Width,bild.Height,bild.Canvas.Handle, 0,0,srccopy);
Das bild schnell auf die Canvas Kopieren.
Sehr wichtig:
Delphi-Quellcode:
procedure TForm1.FormPaint(Sender: TObject);
begin
verweis_auf_bitblt; //also einen verweis auf die Procedure in der du Bitblt benutzt setzten
end;
Ohne dieses onpaint Flackert dein bild wie ein Stroboskop.
Damit sind auch Animationen sehr gut möglich.