Also, so sollte es defintiv gehen:
Füge diese Code irgendwo am Anfang ein.
Delphi-Quellcode:
procedure InvalidateAll(Control:TWinControl);
var i:integer;
begin
InvalidateRect(Control.Handle,nil,True);
for i:=0 to Control.ControlCount - 1 do
if Control.Controls[i] is TWinControl then
InvalidateAll(TWinControl(Control.Controls[i]));
end;
Und dann da, wo du die Flecken weg machen willst:
InvalidateAll(Self);
Probiers aus !!
Viele Grüsse,
Macci