Hmm..
versuche mal:
Delphi-Quellcode:
..
protected
procedure Resize; override;
public
procedure Paint; override;
...
procedure TMyComponent.Resize;
begin
inherited;
Position;
end;
procedure TMyComponent.Paint;
begin
inherited;
Position;
end;
Eventuell kann auch Resize weggelassen werden, da eigentlich das Paint dann neu aufgerufen wird.