请问Delphi自己带的TWebBrowser控件做的浏览器如何屏蔽自动弹出的网页(100分)

  • 主题发起人 主题发起人 codecb
  • 开始时间 开始时间
C

codecb

Unregistered / Unconfirmed
GUEST, unregistred user!
请问Delphi自己带的TWebBrowser控件做的浏览器如何屏蔽自动弹出的网页
 
procedure TMainForm.IE1NewWindow2(Sender: TObject; var ppDisp: IDispatch;
var Cancel: WordBool);
begin
Cancel := True;
end;
 
楼上的正确。顶~来晚了~呵呵~
 
procedure Tfrom1.WebBrowser1NewWindow2(Sender: TObject;
var ppDisp: IDispatch; var Cancel: WordBool);
begin
cancel := true;
end;
 
这么做的话就把超连接打开的网页也给屏蔽掉了,所以是不对的。
我想楼主的意思是怎么才能得到NEWWINDOW2中即将打开的超连接的地址。
 

Similar threads

D
回复
0
查看
930
DelphiTeacher的专栏
D
D
回复
0
查看
871
DelphiTeacher的专栏
D
D
回复
0
查看
944
DelphiTeacher的专栏
D
D
回复
0
查看
777
DelphiTeacher的专栏
D
后退
顶部