Guten Morgen.
Die Methode Repaint ruft ja die überschriebene Methode auf. Ich sehe das Problem eher darin, dass der Code fehlt, der die Methode aktiviert.
Delphi-Quellcode:
procedure TForm1.FormResize(Sender: TObject);
begin
TP.RePaint;
end;
Grüße vom marabu