[NFS73]

Во общем мне необходимо, что бы при нажатие на кнопку в PageContorl1 создавалась бы новая вкладка и в ней WebBrowser.

Код:

1 2 3 4 5 6 7 8 9 10 11

procedure TForm1.ButtonClick(Sender: TObject); var   tabs: TTabSheet;   ie: TWebBrowser; begin         tabs:=TTabSheet.Create(Self);         tabs.PageControl:=PageControl1;         tabs.Caption:='Вкладка';         tabs.Show;         ie:=TWebBrowser.Create(Self); end;

С помощью данного кода при нажатие на кнопку создается новая вкладка(TabSheet) и WebBrowser,но как засунуть этот WebBrowser в данный TabSheet незнаю.Помогите плизз...

[movnet]

Код:

1 2 3 4 5 6 7

tabs:=TTabSheet.Create(Self); tabs.PageControl:=PageControl1; tabs.Caption:='Вкладка'; tabs.Show; ie:=TWebBrowser.Create(Self); TWinControl(ie).Name :='ie1'; TWinControl(ie).Parent := PageControl1.ActivePage;

[NFS73]

Спасибо,помогло

[NFS73]

А как можно обратиться к динамически созданному компоненту WebBrowser? Т.е. в этом коде создается вкладка и браузер в ней,а как потом обратить к этому браузеру

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14

procedure TForm1.GoClick(Sender: TObject); var   tabs: TTabSheet; begin         count:=count+1;         tabs:=TTabSheet.Create(Self);         tabs.PageControl:=Viewer;         tabs.Caption:='Вкладка';         tabs.Show;         ie:=TWebBrowser.Create(Self);         TWinControl(ie).Name :='ie'+IntToStr(count);         TWinControl(ie).Parent := Viewer.ActivePage;         ie.Align:=alClient end;

Пробовал сделать так:

Код:

1	FindComponent('ie' + IntToStr(count)).Navigate(Edit1.Text);

но программа выдала ошибку

[Bargest]

Код:

1	TWebBrowser(FindComponent('ie' + IntToStr(count))).Navigate(Edit1.Text);

Должно сработать.

А вообще по-моему проще всего сделать так:

Код:

1 2 3 4 5 6

var ie:array[0..100]of TWebBrowser; ...  ie[c]:=TWebBrowser.Create;  TWinControl(ie[c]).Parent := PageControl1.ActivePage;  ie[c].Align:=alClient;  inc(c);

[NFS73]

Сообщение от Bargest

Код:

Должно сработать.

А вообще по-моему проще всего сделать так:

Код:

спасибо!

[Alexs2011]

Сообщение от movnet

Код:

возможно ли таким же способом вписать множество разных компонентов только не на активную страницу а на все что построятся, в цикле?