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