Ich schlage vor, du hältst dich an den Rat von Günther und schreibst:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
Invalidate;
end;
....
procedure TForm2.FormPaint(Sender: TObject);
begin
PaintMyData;
end;
Wenn ich das richtig in Erinnerung habe, entscheidet seit einigen Versionen Windows selbst wann etwas dargestellt wird und bemüht dazu in diesem Fall den OnPaint-Event des Forms.