本人用WebBrowser控件打开一个网页
 
   Finished := False ;
    WebBrowser1.Navigate('bbs.csdn.net');
    repeat
      Application.ProcessMessages;
      Sleep(30);
    until Finished ;在WebBrowser的onDocumentComplete事件中写
  Fininshed := True ;发现此法并能准确地反映网页的真实状态(如:正在打开,已打开,超过...)