请问当WebBrowser执行页面中的js脚本window.close()时出错,这该如何处理?? 1.请问当WebBrowser执行页面中的js脚本window.close()时出错,这该如何处理??2.如何让程序略所有错误?谢谢!! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 放一个ApplicationEvents1//忽略WebBrowser的js的window.close();procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG; var Handled: Boolean);begin Handled := (Msg.message = WM_CLOSE) and (Msg.hwnd = WebBrowser1.Handle);end;//忽略所有错误procedure TForm1.ApplicationEvents1Exception(Sender: TObject; E: Exception);begin //不干任何事end; PRB: WebBrowser Control Disappears When Script Calls window.close()http://support.microsoft.com/support/kb/articles/q253/2/19.asp 操作文件问题,急, 各位高手,请给我一个用ClientDataSet动态创建lookup字段的示例代码。 欢迎大家加盟QQ群:Delphi高手突破(群号:1463857) 共同讨Delphi技术,共同交流,共同进步! 按下鼠标左键移动鼠标产生什么事件? 为什么我的Access数据库每次只能提交一次事务?紧急求助! 远程模块中函数的返回值或参数的返回值问题,在线关注。 有什么办法把DBGrid中的ScrollBars去掉? 自动触发程序怎么做,请高手指点。急!!!! 各位请推荐一本介绍ADO编程方面的书 如何使用TNMUDP实现传一个大的文件? 关于控件问题 请大家帮忙起个公司名
procedure TForm1.ApplicationEvents1Message(var Msg: tagMSG;
var Handled: Boolean);
begin
Handled := (Msg.message = WM_CLOSE) and (Msg.hwnd = WebBrowser1.Handle);
end;//忽略所有错误
procedure TForm1.ApplicationEvents1Exception(Sender: TObject;
E: Exception);
begin
//不干任何事
end;
http://support.microsoft.com/support/kb/articles/q253/2/19.asp