Toma lá meu guri (hehehe) Coloquei um PageControl no form (TPageControl1) e um SpeedButton (TSpeedButton1). No clique deste SpeedButton fiz o código para incluir o TabSheet no PageControl.
procedure TForm1.SpeedButton1Click(Sender: TObject); var ts : TTabSheet; begin ts := TTabSheet.Create(PageControl1); ts.Parent := PageControl1; ts.PageControl := PageControl1; end; Abraços, Alessandro. [As partes desta mensagem que não continham texto foram removidas]