Delphi：如何检查webbrowser是否已成功加载页面？

问题描述：

我有一个简单的代码：Delphi：如何检查webbrowser是否已成功加载页面？

WebBrowser1.Navigate('www.foo.com');

但当然有时浏览失败，浏览器将显示错误消息。
当发生这种情况时，我该如何捕捉？
我想这样做，我可以做一些自定义日志。

我不知道你是否可以检查TWebBrowser.ReadyState的成功（也许在一个while循环或使用TTimer）。如果ReadyState在合理的时间内未返回READYSTATE_COMPLETE，请提出自己的错误。 – 2012-07-19 22:01:16

答

我认为在出现问题时会调用OnNavigateError事件处理函数。

奇怪，但似乎我的TWebBrowser不支持OnNavigateError，即使我在MSDN上发现它已应用于它。为什么是这样？我正在使用Delphi7 btw。 – SmRndGuy 2012-07-19 20:54:21

不，我绝对相信OnNavigateError丢失。 Infact'WebBrowser1.onNavigateError：= ;'抛出一个错误，告诉'onNavigateError'没有声明。我该怎么办？ – SmRndGuy 2012-07-19 21:07:06

@SmRndGuy：你是对的;它在D7中不存在。（D7导入一个旧版本的IE类型库（'SHDocVw'），您可能需要删除它并导入更新版本的类型库以使用更新的IE版本或使用类似免费软件[TEmbeddedWB] （http://www.bsalsa.com/product.html），它提供了更多的功能 – 2012-07-19 22:26:23

Delphi：如何检查webbrowser是否已成功加载页面？

相关推荐