Ja könnte man, aber das hilft nicht im obigen Fall des Quelltextes.
Da gibt es so einige, sagen wir mal Fehlerlein.
Delphi-Quellcode:
var x,y,z: integer;
begin
PaintBox1.Refresh; //löschen der Paintbox
Ja, löschen in dem man die Paintbox dazu zwingt sich selbst neu zu Zeichnen.
Man nehme ein
Canvas.Fillrect(PaintBoxX.Clientrect); und gut.
Image14.Picture.Destroy; //löschen des Image-inhaltes
Wie schon beschrieben,
Image14.Free; //löschen des Image-Inhaltes wäre angebracht.
Besser noch folgendes:
if ASSIGNED(Image14) then Image1.Free;
Des weiteren würde ich mich von den Images verabschieden und gleich mit Bitmaps (TBitmap) arbeiten.
Hier wäre ein
Offscreenbitmap angebracht, auf das man alles vor zeichnet um es danach
anzuzeigen.