我正在使用Webbrowser控件导航到具有JavaScript卸载事件的网站。当我尝试导航到其他地方时,会出现一个弹出窗口,提示我是否要“停留在页面上”或“离开页面”。如果继续尝试导航,则会抛出COMException。如何防止此类弹出窗口出现在Web浏览器中?
编辑:
准备导航到另一个网页时,如何禁用Javascript?
最佳答案
您可以执行以下操作(Delphi代码):
var
WrkIHTMLWindow2: IHTMLWindow2;
WrkIHTMLWindow2Disp: IHTMLWindow2Disp;
begin
WrkIHTMLWindow2 := IHTMLDocument2Disp(WrkIWebBrowser2.Document).parentWindow;
if WrkIHTMLWindow2.QueryInterface(IHTMLWindow2Disp, WrkIHTMLWindow2Disp) = S_OK then
if not VarIsNull(WrkIHTMLWindow2Disp.onbeforeunload) then
WrkIHTMLWindow2Disp.onbeforeunload := NULL;