StatusBar wird nicht repainted

[turboPASCAL]

Ja, das ist bei Delphi6 & dem Windows XP Manifest so.
Abhilfe, wenn auch nicht auf die feine Art schaft:

Delphi-Quellcode:

procedure TMeineForm.StatusBar1Resize(Sender: TObject);
begin
  Invalidate; // wegen SizeGripBug bei D6 & WinXP-Manifest
end;