如何，在动态添加的tab控件中添加TWebBrowser控件？

[luming988]

主窗体上有一个CTPageControl控件，我动态添加了三个TTabSheet控件，我想在每一个TTabSheet中添加一个TWebBrowser的控件，然后分别设置TWebBrowser的属性,动态添加TTabSheet控件的代码如下，其余该如何做那？
i :integer;
tmpTabSheet: TTabSheet;
begin
for i:=1 to 3 do
begin
tmpTabSheet := TTabSheet.Create(frmSpFlat);
tmpTabSheet.Name :=inttoStr(i);
tmpTabSheet.Caption :=inttoStr(i);
tmpTabSheet.PageControl :=PageControl1;
end;
end;

[weitao999]

i :integer;
tmpTabSheet: TTabSheet;
begin
for i:=1 to 3 do
begin
tmpTabSheet := TTabSheet.Create(frmSpFlat);
tmpTabSheet.Name :=inttoStr(i);
tmpTabSheet.Caption :=inttoStr(i);
tmpTabSheet.PageControl :=PageControl1;
tmpwb:=Twebbrowse.create(self);
tmpwb.parent:=tmptabsheet;
......
end;
end;

[truexeen]

关键是TTabSheet的InsertControl方法，TWebBrowser的Parent属性没有作用.
TabSheet.InsertControl(WebBrowser);

[fancier]

试试把self改成tmptabsheet
tmpwb:=Twebbrowse.create(tmptabsheet);
tmpwb.parent:=tmptabsheet;

[zyn01]

tmpTabSheet.InsertControl(tmpWebBrowser);
tmpwebbrowser.visible:=true;