Delphi中判断WebBrowser的页面是否加载完成

方法一：

在WebBrowser的OnDocumentComplete事件书写代码。

方法二：

WebBrowser1.Navigate(Url);

while WebBrowser1.Busy  or (WebBrowser1.ReadyState<>READYSTATE_COMPLETE) do

  Application.ProcessMessages;