• <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>
  • 用C++Builder建立自己的Web瀏覽器

    發表于:2007-07-04來源:作者:點擊數: 標簽:
    中央民族大學 楊 超 廖海波 用夠了IE 和Netscape 的朋友, 有沒有想過也編制一個自己的瀏覽器呢? 用C ++Builder 使得你能夠方便高效地創建自己的Inte .net 程序。由于C ++Builder 的基本語言是C ++, 所以它幾乎可以做任何事情, 通過C ++Builder 的組件
    中央民族大學 楊 超 廖海波

      用夠了IE 和Netscape 的朋友, 有沒有想過也編制一個自己的瀏覽器呢? 用C ++Builder 使得你能夠方便高效地創建自己的Inte.net 程序。由于C ++Builder 的基本語言是C ++, 所以它幾乎可以做任何事情, 通過C ++Builder 的組件設置, 你可以像其他應用程序一樣建立Internet 應用, 這意味著你可以擴展這些組件來增強他們的功能。如果需要的話, 它也可以處理低水平的API 細節, 因為它是基于C ++的。如果直接使用API( 如ISAPI) 建立Internet 應用, 你選用的工具必須能使用并建立DLL, 而且能利用這些DLL 公布的接口。

      讓我們看一下它的Internet 組件及功能:

     ?。?br>
      FTP 支持遠程機器間交換文件

      THTML 支持分析和規劃html 數據并提供一個當前html 頁的可滾動視圖

      THTTP 提供訪問超級文本傳輸協議

      TNTTP 提供讀取新聞組的能力

      TPOP 提供訪問pop3 電子郵件協議

      TSMTP 支持傳送Internet 郵件報文組給SMTP服務器

      TTCP 提供訪問winsock 傳送控制協議( 客戶和服務器端)

      TUDP 提供訪問winsock 用戶數據圖協議( 客戶端和服務器端)

     ?。?br>
      現在就可以開始建立瀏覽器了。

      1. 先建立一個新的工程文件

      創建一個新表單, 設它的Caption 屬性為mybrowse,Position 的屬性為PoScreeCenter 將一個TTabControl 組件放在表單頂部, 這個控制在你瀏覽中列出的URL,使你很容易返回到你已經訪問過的節點, 設置Align 的屬性為alTop, 這樣以使程序運行時它總處于表單的頂端, 再放置一個Tpanel 并設置Align 屬性為alBottom, 使它運行時處于底端, 在對象觀察器中刪除Caption 屬性, 并設TabOder 為0,再向表單中加入另一Tpanel, 清除其Caption 屬性, 并放置兩個TBitBtn,Caption 分別設置為GO 和HOME, 在表單的底部放置一個TcomBoBox 并刪除Text 屬性, 程序運行時, 你將在它里面鍵入或下拉選擇你要訪問的URL,最后在表單上放置一個THml 組件, 這將顯示你訪問的網頁。下面就可以編寫代碼了。

      2. 編寫代碼

      1 為TabControl 的OnChange 事件( 使cbURL 與tcURL 同步) 編寫代碼:
       cbURL ->Text=tcURL ->Tabs ->Strings
    [tcURL ->TabIndex];
       cbURL ->SelectAll( );
       bbGo ->Click( );
    // 使點擊go 與點表格相同效果
      2 為THtml 的OnbeginRetrieve 事件編寫代碼:

       Cursor=(TCursor)crHourGlass;
       if (cbURL ->Items ->
          indexOf(htBrowser ->URL)== -1)
       {
       cbURL ->Items ->Add(htBrowser ->URL);
           // 檢查TComboBox 保持的URL 是否
       cbURL ->Text=htBrowser ->URL;
          // 包含要瀏覽的地址
      < file:// 包含要瀏覽的地址> , 如沒有則
         cbURL ->SelectALL( );
       // 將其加入到TComboBox 和
       tcURL ->Tabs ->Add(htBrowser ->URL);
    //TTabControl 中
     tcURL ->TabIndex=tcURL ->Tabs ->Count -1;
       bbGo ->Click( );
       }
      為THTML 的OnEndRetrieve 實踐編寫代碼;

       Cursor=(TCursor)crDefault;
      3 為go 按鈕的OnClick 事件編寫代碼:

      htBrowser ->equestDoc(cbURL ->est) // 打開任何在TComboBox 中指定的URL


    //(cbUCL)
      4 為按鈕home 的OnClick 編寫事件:

     htBrowser ->equestDoc ->(HomePage)
     // HomePage 為常數, 須在程序首定義, 如
     // String   HomePage="http://www.sohoo.com"
        }
      現在你已編好了你自己的瀏覽器。

      快! 試一試吧!   

    原文轉自:http://www.kjueaiud.com

    老湿亚洲永久精品ww47香蕉图片_日韩欧美中文字幕北美法律_国产AV永久无码天堂影院_久久婷婷综合色丁香五月

  • <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>