delphi禁止webbrowser弹出窗口或者脚本错误
delphi禁止webbrowser弹出窗口或者脚本错误
webbrowser1.silent:=true; //屏蔽脚本错误
procedure TForm1.WebBrowser1NewWindow2(Sender: TObject; var ppDisp: IDispatch; var Cancel: WordBool);
begin
Cancel:=True; //禁止弹出窗口
end;
出自
http://www.delphitop.com/html/kongjian/554.html
- 上一篇 »javaScript 弹出窗口
- 下一篇 »JavaScript:关闭弹出窗口时刷新父窗口