2

我正在使用 webbrowser 控件导航到具有 JavaScript 卸载事件的站点。当我尝试在其他地方导航时,会出现一个弹出窗口,提示我是要“留在页面上”还是“离开页面”。如果我继续尝试离开,则会引发 COMException。

如何防止此类弹出窗口出现在我的网络浏览器中?

编辑:
当我准备好导航到另一个网页时,如何禁用 Javascript?

4

1 回答 1

0

你可以做这样的事情(德尔福代码):

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;
于 2014-02-21T11:47:13.310 回答