<form id="hz9zz"></form>
  • <form id="hz9zz"></form>

      <nobr id="hz9zz"></nobr>

      <form id="hz9zz"></form>

    1. 明輝手游網中心:是一個免費提供流行視頻軟件教程、在線學習分享的學習平臺!

      使用BCB巧建WEB瀏覽器

      [摘要]THTML控件是個現成的Web瀏覽器,只要將這些控件放在窗體上并調用Request Doc()方法,也許這有些過份簡化,但顯示Internet上的Web文檔也就這么簡單。因此,下面顯示了如何迅速編寫...
      THTML控件是個現成的Web瀏覽器,只要將這些控件放在窗體上并調用Request Doc()方法,也許這有些過份簡化,但顯示Internet上的Web文檔也就這么簡單。因此,下面顯示了如何迅速編寫Web瀏覽器應用程序。

      第一步如下:

      1.開始新的主應用程序,將窗體的Name屬性變成Web Main,將Caption屬性變成EZ Web Browser。

      2.將Panel構件放在窗體上,將其Align屬性變為al Top,Height屬性變為60,清除Caption屬性。

      3.將Combo Box構件放在面板上,移到面板頂部并讓它象面板一樣寬,將Name屬性變成URL Combo Box,將Text屬性變為所選URL(如http://www.microsoft.com)

      4.將Status Bar構件放在窗體上,它自動放在窗體底部,將其Name屬性變成Status Bar,Simple Panel 屬性變為true。

      5.將HTML控件放在窗體中央,將Align屬性變為a Client。HTML控件即填滿屏幕。將Name屬性變成HTML。 這時窗體如果還不美觀則可以稍作調整,也可以保持原樣(有點個性也不是壞事)。 這時應保存項目,將窗體存為Web BrwsU.cpp,項目成為Web Brows.cpp。然后要加進讓瀏覽器工作的功能。

      6.單擊URL組合框,產生On Click事件的處理器,在這個事件處理器中輸入如下代碼:
      if (URL Combo Box > Text! ="") HTML > Request Doc (URL Combo Box > Text);

      7.產生On Key Press事件的事件處理器在這個事件處理器中輸入如下代碼:
      if (Key = = VK_RETURN){
      Key =0;
      if (URL Combo Box > Text = = "")return;
      URL Combo Box > Items > Insert(0,URL Combo Box > Text);
      URL Combo Box Click(Sender);
      }

      8.然后編譯和運行程序。在組合框中輸入URL并按Enter。如果輸入有效URL,則頁面裝人HTML控件中。15分鐘就建成了Web瀏覽器,這個瀏覽器已經很有樣子了。只是還要加進不少功能。注意每次按Enter鍵時,輸入的URL都會加進組合框的清單中。

      第二步:最后修飾
      首先在URL組合框下面加幾個按鈕。步驟如下:
      1.在URL組合框下面加一個按鈕,按Name屬性為Go Btn,Caption變為GO!

      2.產生新按鈕的On Click事件處理器,在事件處理器中輸入下列代碼:
      URL Combo Box Click(0)*

      3.在URL組合框下面加另一個按鈕,放在第一個按鈕右邊,將Name屬性變為Stop Btn,Caption變為Stop。

      4.產生新按鈕的On Click事件處理器,在事件處理器中輸入下列代碼:
      HTML > Cancel(0); Status Bar > Simple Text ="Done";

      5.在前面兩個按鈕右邊放第三個按鈕,將Name屬性變為Reload Btn,Caption變為Reload。

      6.產生新按鈕的On Click事件處理器,在事件處理器中輸入下列代碼:
      URL Combo Box Click(0);

      7.在面板上放最后一個按鈕。將Name屬性變為Source Btn,Caption變為View Source。

      8.產生新按鈕的On Click事件處理器,在事件處理器中輸入下列代碼:

      HTML > View Source =!HTML
      > View Source; if
      (HTML > View Source) Source Btn > Caption= "
      View Document"; else Source Btn > Caption= "View
      Source"。 


      日韩精品一区二区三区高清