怎么样获取浏览器“该页无法显示”这类的异常 - -

怎么样获取浏览器“该页无法显示”这类的异常 - - Delphi / Windows SDK/API
http://www.delphi2007.net/DelphiNetwork/html/delphi_20061128152441238.html
用WebBrowser.Navigate，万一页面刷不开，显示“该页无法显示”或者“找不到服务器”，这样的状态怎么捕获？    
   
  求教高人指点   ……

 
    if   WebBrowser.Navigate('某某页面的网址')   =   ''   then    
        showmessage('没有打开到浏览器');