Starthilfe für Graphik Zeichnen

[schwa226]

Ich doof...

Ich habe das verwendet:
Bitmap.Canvas.FillRect(Rect(0,0,Bitmap.Width,Bitma p.Height));

und das ging im OnResize nicht. Es muss sein:

Delphi-Quellcode:

  Image.Picture.Bitmap.Canvas.FillRect(
    Rect(
          0,
          0,
          Image.Picture.Bitmap.Width,
          Image.Picture.Bitmap.Height)
          );

Dann geht es und die alten Linien werden gelöscht!