隨筆 - 312, 文章 - 14, 評論 - 1393, 引用 - 0
          數(shù)據(jù)加載中……

          Delphi使用資源文件全攻略

          本文為原創(chuàng),如需轉(zhuǎn)載,請注明作者和出處,謝謝!

              在通常情況下使用delphi設計程序,都是將字符串、圖像等資源直接使用delphi提供的vcl控件加到*.dfm中,這樣做會合修改這些資源時帶來 不便,如果資源被多次引用,這些資源在程序啟動時都被加載到內(nèi)存中,非常耗費系統(tǒng)資源。因此,這就需要一種新的引用資源的文件:資源文件。資源文件就是將 一些資源,如字符串、圖像等信息進行編譯,然后在程序中引用編譯后的資源文件,最后和源程序一起編譯生成可執(zhí)行文件。由于在資源文件中的資源是在需要時加 載,因此,比較節(jié)省系統(tǒng)資源,而且,如果要做國際化版本的系統(tǒng),只需要將資源文件一換,重新編譯即可。下面就詳細介紹delphi中資源文件的建立和使 用。

          一、建立資源文件

              資源文件的源文件是普通的文本文件,擴展名是*.rc。將資源文件的內(nèi)容寫入文件后,調(diào)用brcc32.exe將其編譯后生成*.res文件。brcc32.exe在delphi的bin目錄中。

          二、字符串資源

              字符串資源實際上是將一個字符串和一個數(shù)字索引對應,在裝載字符串資源時,需要提供這個字符串資源所對應的數(shù)字索引。字符串資源文件以stringtable開頭,使用一對begin和and將資源定義括起來。 字符串資源的格式是:數(shù)字索引,"資源字符串"。
          string.rc文件內(nèi)容
          stringtable
          begin
          1001, "新建"
          1002, "保存"
          1003, "關(guān)閉"
          1004, "幫助"
          1005, "退出"
          1006, "資源文件測試"
          End
              然后調(diào)用命令:brcc32.exe string.rc ,生成string.res,最后在程序中加入{$R string.res}。以下所述的*.rc文件都需使用類似的方法進行編譯和引用。

              在delphi中有兩種方法可以裝載字符串資源。
              1. 使用Windows API函數(shù)LoadString。使用這個函數(shù)需要定義一個char數(shù)組,調(diào)用的形式如下。

              LoadString(hInstance, 1001, buffer, 100); //100:buffer數(shù)組的最大長度,1001:數(shù)字索引

              2. 使用delphi自身的函數(shù)LoadStr。這個函數(shù)只需要一個數(shù)字索引就可得到相應的字符串資源。調(diào)用的形式如下。

              button2.Caption := LoadStr(1002);

          三、Bitmap資源

              位圖資源的定義就相對簡單得多。每個位圖資源只需要定義三項:位圖標識 位圖類型 位圖文件名 (這三項中間用空格或tab隔開)其中位圖標識和字符串資源的數(shù)字索引類似,只是位圖標識可以是字符串。位圖類型是BITMAP。

              調(diào)用bitmap資源有兩種比較常用的方法。
              1. 使用bitmap的LoadFromResourceName方法。
              2. 使用windows API函數(shù)LoadBitmap。這種方法的代碼示例如下:
              bmp := TBitmap.Create ;
              bmp.Handle := LoadBitmap(Hinstance,'bmp');
              rect.Left := 0;
              rect.Top := 0;
              rect.Right := image2.Width;
              rect.Bottom := image2.Height;      
              rect1.Left := 0;                       
              rect1.Top := 0;
              rect1.Right := bmp.Width;
              rect1.Bottom := bmp.Height;
              image2.Canvas.CopyRect(rect, bmp.Canvas, rect1);
              第一種方法比較簡單,但如果是拉伸裝載時,第二種方法效果比較好。也可用類似的方法裝載icon和cursor文件,其中裝載icon使用LoadIcon,裝載cursor使用LoadCursor。

          四、Jpeg資源

              裝載Jpeg資源沒有Windows API,但可以使用delphi提供的TResourceStream類。在定義資源文件時,資源類型使用RCDATA。示例代碼如下:
             jpg := TJpegImage.Create ;
             rstream := TResourceStream.Create(Hinstance, 'jpg', RT_RCDATA) ;
             jpg.LoadFromStream (rstream) ;
             image3.Picture.Bitmap.Assign (jpg);

          五、裝載任意文件

              資源文件中不僅可以存儲已知類型的資源,如字符串、bitmap、jpeg等,還可以存儲任意類型的文件。除了字符串,其它類型的資源文件的格式類似,只 是在資源類型上有所變化。除了已知的資源類型外,可以自定義資源類型。如jpeg資源可以不用RCDATA,而用JPEG,但在調(diào)用時需要做如下處理。
          rstream := TResourceStream.Create(Hinstance, 'jpg1', 'JPEG') ;

          六、從其它程序裝載資源

              在上述的例子中的資源都是從當前的exe中裝載,但有些時候需要從另外的exe或dll,而不是自身裝載資源。對于這種需求只要在上述例子中將Hinstance改為LoadLibrary(exe或dll名)即可。
            rstream := TResourceStream.Create(LoadLibrary('project1.exe'), 'jpg1', 'JPEG') ;
            在裝載后,可以使用TResourceStream的SaveToFile將資源保存成文件,或做其它處理。





          Android開發(fā)完全講義(第2版)(本書版權(quán)已輸出到臺灣)

          http://product.dangdang.com/product.aspx?product_id=22741502



          Android高薪之路:Android程序員面試寶典 http://book.360buy.com/10970314.html


          新浪微博:http://t.sina.com.cn/androidguy   昵稱:李寧_Lining

          posted on 2008-05-10 19:19 銀河使者 閱讀(673) 評論(0)  編輯  收藏 所屬分類: delphi 原創(chuàng)

          主站蜘蛛池模板: 汕尾市| 剑河县| 石泉县| 古田县| 宝应县| 来凤县| 尚义县| 资源县| 凌海市| 玛多县| 克什克腾旗| 广安市| 东乡县| 嵊州市| 喀喇沁旗| 镇赉县| 康保县| 游戏| 科技| 平和县| 额济纳旗| 栾城县| 堆龙德庆县| 墨竹工卡县| 罗定市| 铁力市| 抚松县| 兴仁县| 寿阳县| 黔东| 开化县| 大邑县| 中卫市| 开鲁县| 蒙自县| 张掖市| 永嘉县| 浦东新区| 福建省| 都昌县| 武义县|