TWebBrowser如何捕捉网页的错误并屏蔽

Question

在网页脚本有错误的时候，例如“...为空或不是对象”之类的，ie浏览的时候会在状态栏报错误，不会弹出错误窗口。但是如果在delphi7中用TWebBrowser浏览，就会弹出对话框，提示“运行时间错误，是否进行调试”。有没有方法可以捕捉这个错误，并且屏蔽这个对话框的？

Answer 1

try
  ....
exceptend;

Answer 2

try
  打开网页的
except
end;

Answer 3

试过了 try
   WebBrowser1.Navigate(url);
 except
 end;但是没用，因为这个异常应该不是navigate这个函数中产生的，而应该是后续的打开页面线程中长生的吧。

Answer 4

設置 WebBrowser 的 silent 屬性為 True

Answer 5

不能用silent属性吧？那样会把所有的正常的弹出对话框都干掉。而且即便设了silent属性，也会被认为缺省时调试，自动进入msde环境。

Answer 6

procedure TForm1.Timer2Timer(Sender: TObject);
var
  H:HWND;
begin
  h:=findwindow(nil,'窗口标题');
  if H>0 then
  begin
    SendMessage(H,WM_CLOSE,0,0);
    Timer2.Enabled:=False;
  end;
end;或者你试试这样子直接把窗口关掉看看。