um bei Deinem Beispiel, zu bleiben, ich hatte eher so gemeint
Delphi-Quellcode:
procedure TForm1.PageControl1Resize(Sender: TObject);
begin
PageControl2.Left := -2;
PageControl2.Top := -2;
PageControl2.Width := Tabsheet1.Width + 5;
PageControl2.Height := Tabsheet1.Height + 5
end;