禁用对话框webbrowser delphi

Question

如何防止对话框的出现此文档已更改。保存更改？当webbrowser about：blank

时发生在转换中

非常感谢你。这样做了

  Browser.Navigate ('about: blank');
  DesignMode (false ,'');
  Browser.OnNavigateComplete2: = NavigateComplite;

procedure NavigateComplite (ASender: TObject; const pDisp: IDispatch; var URL: OleVariant);
begin
  DesignMode (true ,'');
end;

Answer 1

我认为你在代码中使用designMode接口的IHTMLDocument2属性。

您可以禁用将此属性设置为“关闭”的对话框。

在更改为新页面之前尝试此代码

(WebBrowser1.Document as IHTMLDocument2).designMode := 'off';
WebBrowser1.Stop;