国产一级a片免费看高清,亚洲熟女中文字幕在线视频,黄三级高清在线播放,免费黄色视频在线看

1．編寫(xiě) RC 腳本文本

用記事本或其它文本編輯器編寫(xiě)一個(gè)擴(kuò)展名為“.rc”的文件。格式如下：

資源標(biāo)識(shí)符  資源類(lèi)型關(guān)鍵字  資源文件名

其中“資源類(lèi)型關(guān)鍵字”用于標(biāo)識(shí)資源文件的類(lèi)型：

AVI     無(wú)聲動(dòng)畫(huà)

BITMAP  位圖文件

CURSOR  光標(biāo)文件

ICON    圖標(biāo)文件

WAVE    聲音文件

以上所列均為標(biāo)準(zhǔn)資源類(lèi)型，也可以給資源自定義一個(gè)類(lèi)型，如：“mytype”。不過(guò)兩者在調(diào)用方式上有些不同（在后面示例“存取資源文件中的位圖”中有詳細(xì)描述）。

2．根據(jù) RC 腳本文件編譯成 RES 資源文件

在命令提示符中輸入以下內(nèi)容：

brcc32 FileName.rc  //注：brcc32.exe在DelphiX\Bin目錄中

3．在Delphi單元中加入資源文件

將生成的 RES 資源文件復(fù)制到相應(yīng)程序所在的目錄中，在單元文件中的“{$R *DFM}”后面加上“{$R FileName.res}”，編譯后資源文件就被包含在可執(zhí)行文件中了。

說(shuō)明：如果嫌2、3兩步麻煩，可以采用更簡(jiǎn)便的做法，即：將 RC 文件直接添加到項(xiàng)目中，在編譯Delphi項(xiàng)目時(shí)，會(huì)自動(dòng)編譯該資源文件。

4．資源文件調(diào)用示例

（1）存取資源文件中的位圖

//RC: testBmp bitmap res\test.bmp

Image1.Picture.Bitmap.LoadFromResourceName(HInstance, ‘res\test.bmp‘);

//RC: testBmp bmptype res\test.bmp

var

  resStream: TResourceStream;

begin

  resStream := TResourceStream.Create(HInstance, ‘testBmp‘, ‘bmptype‘);

  Image1.Picture.Bitmap.LoadFromStream(resStream);

  resStream.Free;

end;

請(qǐng)注意上面兩種調(diào)用方式的不同之處。

（2）存取資源文件中的圖標(biāo)

將圖標(biāo)放在資源文件中，可以實(shí)現(xiàn)動(dòng)態(tài)改變應(yīng)用程序的圖標(biāo)。

//RC: testIcon icon res\test.ico

Application.Icon.Handle := LoadIcon(HInstance, ‘testIcon‘);

（3）存取資源文件中的AVI動(dòng)畫(huà)

//RC: testAvi avi res\test.avi

Animate1.ResName := ‘testAvi‘;

Animate1.Active := True;

（4）存取資源文件中的JPEG圖像

為了能夠處理JPEG圖像，必須在Interface處引用JPEG單元。

var

  jpg: TJPEGImage;

  resStream: TResourceStream;

begin

  jpg := TJPEGImage.Create;

  resStream := TResourceStream.Create(HInstance, ‘testJpg‘, ‘jpgtype‘);

  jpg.LoadFromStream(resStream);

  Image1.Picture.Assign(jpg);

  jpg.Free;

  resStream.Free;

end;