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

Question

主窗体上有一个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;

Answer 1

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;

Answer 2

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

Answer 3

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

Answer 4

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