Question

WebBrowser控件问题

问题1：我给一个超链接执行InvokeMember("Click")，发现页面已经变了，可就是没有执行DocumentCompleted事件
问题2：同样超链接执行了InvokeMember("Click")，页面也发生了变化，但是通过webBrowser1.Document取没有变化

Answer 1

部分代码如下：
在窗口及WebBrowser创建完以后，写此代码：
WebBrowser.OnNewWindow2:=IE1NewWindow2;
给主窗口创建一个方法：
procedure TBrowForm.IE1NewWindow2(Sender: TObject; var ppDisp: IDispatch;var Cancel: WordBool);
Var NewForm:TBrowForm;
begin
try
NewForm :=TPopBrowerForm.Create(application);
NewForm.WebBrowser.OnNewWindow2 :=IE1NewWindow2;//如果在窗口的Oncreate事件
//有此代码，此处就可以省略
ppDisp := NewForm.WebBrowser.Application;
NewForm.Show;
Cancel:=false;
except
end;
end;