[garance]

я создал pageControl на форме, и зделал так, что-бы при нажатии определенной кнопки создавалась TabSheet на которой лежит WebBrowser и другие компоненты...
Вот тебе код, но здесь вместо моих компонентов подставь свои, должно работать. Только не забудь в Uses написать, какие компоненты используються!

Код:

procedure TForm1.ToolButton1Click(Sender: TObject);
var

  PageControl: TsPageControl;
  TabSheet: TsTabSheet;
  fShellListView: TShellListView;
  fShellTreeView: TShellTreeView;
  fShellComboBox: TShellComboBox;
begin

  // создаем первую страницу и связуем с PageControl
  TabSheet := TsTabSheet.Create(Self);
  TabSheet.Caption:= ('');
  TabSheet.PageControl := sPageControl1;
  fShellListView := TShellListView.Create(Self);


  // создаем компоненты первой страницы

  with fShellListView do
  begin
   Parent := TabSheet;
   Align := alClient;
   end;
  with TShellTreeView.create(self) do
  begin
 ShellListView := fShellListView;
  parent :=TabSheet;
  Align :=alleft;
  width :=200;
   end;
 with Tshellcombobox.Create(self) do
  begin
   parent :=TabSheet;
   ShellListView := fShellListView;
    align :=altop;
  end;
  end;