WebBrowser 判断加载完成

while webbrowser1.busy then
      Application.ProcessMessages; //busy为true时加载未完成；

while webbrowser1.ReadyState <>READYSTATE_COMPLETE do
      Application.ProcessMessages; //加载完成readystate=READYSTATE_COMPLETE；否则未完成；

 

如果一个网页有多个框架，此方法不可用。