Twebbrowser如何防止彈出這個錯誤呢

Question

如圖所示，有些網址會跳出錯誤，要怎麼不讓Twebbrowser不跳出來來這個訊息呢?
已將
WebBrowser1.Silent = True; 
但仍然會錯呀

Answer 1

procedure TForm2.wb1NewWindow2(ASender: TObject; var ppDisp: IDispatch;
  var Cancel: WordBool);
begin
  Cancel:=True;
end;

Answer 2

WebBrowser1_DownloadBegin()   
  WebBrowser1_DownloadComplete()   
  在上面两个事件或者其他事件中加入下面这一行   
  WebBrowser1.Silent   =   True   

Answer 3

WebBrowser1.Silent  =  True