funktioniert nicht wie du das meinst
Delphi-Quellcode:
procedure TForm1.Btn_ClearallClick(Sender: TObject);
begin
PaintBox.Invalidate;
paintbox.canvas.brush.color:=clwhite;
paintbox.Canvas.FillRect(Rect(0,0,paintbox.width,paintbox.height));
end;
// wie soll ich das denn hier angeben das muss ja in eine Procedure rein???
procedure TForm1.FormCreate(Sender: TObject);
begin
paintbox.canvas.brush.color:=clwhite;
paintbox.Canvas.FillRect(Rect(0,0,paintbox.width,paintbox.height));
end;