webbrowser使用有关问题

webbrowser使用问题
在webBrowser中得页面点链接，不弹出新窗口而直接在本窗口显示代码如下：

Delphi(Pascal) code

procedure TfromMain.spbtnTVClick(Sender: TObject);var  Url: string;begin  Url := 'http://tv.sohu.com/hdtv/'  if Url <> '' then WebBrowser2.Navigate(Url);end;procedure TfromMain.WebBrowser2StatusTextChange(Sender: TObject;  const Text: WideString);begin  FNewUrl := Text;end;procedure TfromMain.WebBrowser2NewWindow2(Sender: TObject;  var ppDisp: IDispatch; var Cancel: WordBool);begin  Cancel := True;  ppDisp := WebBrowser2.Application;  WebBrowser2.Navigate(FNewUrl)end;

功能是实现了，但显示页面时，老是弹出脚本错误“对象不支持该属性。。。”，请问是怎么回事

[解决办法]
设置WebBrowser1.Silent := True;
忽略脚本错误

查看更多 下一篇