这是什么原因？？？？对你我他都有好处的问题(100分)

lnboy谢谢你！

这是在创建分页浏览器的叶面
procedure TForm1.WebBrowser1NewWindow2(Sender: TObject;
var ppDisp: IDispatch;
var Cancel: WordBool);
var
w : Twebbrowser;
ta :tTabsheet;//tabpage的叶面
begin

ta := ttabsheet.CreateParented(pagecontrol1.handle);
ta.PageControl :=pagecontrol1;
ta.Show;//
w := Twebbrowser.CreateParented(ta.handle);
w.Align := alclient;
ta.InsertControl(w);//这四ole特有的
w.OnNewWindow2 :=form1.WebBrowser1NewWindow2;
ppDisp :=w.Application;

你的原因在于nil是空值，它需要各handle

多人接受答案了。