Delphi 德尔福：网络浏览器&x27；OnDownloadComplete一次发生多次

例如，在本代码中：

procedure TForm1.WebBrowser1DownloadComplete(Sender: TObject);
begin
        ShowMessage('Download Completed');
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
        WebBrowser1.Navigate('http://www.google.com/');
end;

“WebBrowser1DownloadComplete”消息在1导航上多次出现。
这很烦人，使此事件几乎毫无用处。

为什么会这样？如何避免这种情况？

---

谢谢

也许OnNavigationComplete2事件处理程序更适合您的应用程序

在Web浏览器成功导航到某个位置后立即发生 新地点

编写OnNavigateComplete2事件处理程序，以便在Web浏览器成功导航到新资源时执行特定操作。该事件可能发生在文档完全下载之前，但发生时必须至少接收部分文档并创建文档的查看器

---

这是因为帧。每次触发此事件时，都会下载一个帧。无论如何，您确定需要观看下载完成的

OnDownloadComplete

？您不想改用

OnDocumentComplete

吗？对于

OnDocumentComplete

，您可以使用，但对于您的案例，无法告诉您更多。这就是为什么会发生这种情况。谢天谢地，NavigateComplete2也这么做了，但我决定支持它，而不是反对它。谢谢你提供的信息。为什么这是公认的答案？它既不能解释问题，也不能解决问题，这是问题所要求的两件事。因为没有其他答案，而且系统一直在烦扰我选择最佳答案，因此我不得不这样做。