不知道是截取了什么时间
ie的新接口(OnNewWindow2)也太奇怪了，反而把新链接的地址参数取消了！
不知道var ppDisp: IDispatch;能不能做什么文章

procedure TForm1.WBerNewWindow2(Sender: TObject;
var ppDisp: IDispatch; var Cancel: WordBool);
begin
ppDisp:=(sender as TWebBrowser).DefaultDispatch; <---好像没有任何效果
{
//Cancel := True;
//(sender as TWebBrowser).Navigate URL
//(sender as TWebBrowser).Stop;
//gourl(lasturl);
lasturl:=(sender as TWebBrowser).LocationURL; <---这时得到的还是旧地址
bnew:=true;
}
end;