Delphi 與網頁結合的開發程序主界面

用Delphi 做程序的主框架。利用頁面
做導航窗口，那麼如何才讓Delphi來響應
頁面中的單擊操作呢？其實很簡單
1.在主程序中加一個TWebBrowser組件
  用它來顯示頁面
2.在BeforeNavigate2事件中處理響應操作
  例如：
  If Pos('varex:0101', URL)>0 Then
  begin
    //執行一些操作
    SendMessage(frmMain.Handle,ESD_MSG,101,0);
    Cancel:=True;
  end;
 
  代碼說明： varex:0101 是網頁中一個熱點所指向的連接
  網頁中的代碼
  <img src="image/111.jpg" width="396" height="184" border="0" usemap="#Map">
  在網頁中每個圖像都有usemap，爲它起一個名字
  <map name="Map">
    <area shape="rect" coords="19,4,100,24" href="varex:0101"> 
    <area shape="rect" coords="21,33,100,49" href="gzgl.html">
  </map>