Canvas Flackert bei Refresh

[stiftII]

Hallo,

Funktioniert leider nicht .. Wird Onpaint nicht auch erst ausgeführt wenn was gezeichnet wird ?

Delphi-Quellcode:

procedure TForm1.FormPaint(Sender: TObject);
begin
  Form1.Canvas.Brush := Brush;             //select brush
  Form1.Canvas.FillRect(Form1.ClientRect); //redraw form

    Form1.Canvas.Rectangle(x,y,100+x,100+y);

  Form1.Canvas.Rectangle(x1,y1,x2,y2);
end;

Was hat es mit dem "Double Buffered" auf sich ?.

~stift