1.编写 RC 脚本文本
用记事本或其它文本编辑器编写一个扩展名为“.rc”的文件。格式如下:
资源标识符 资源类型关键字 资源文件名
其中“资源类型关键字”用于标识资源文件的类型:
AVI 无声动画
BITMAP 位图文件
CURSOR 光标文件
ICON 图标文件
WAVE 声音文件
以上所列均为标准资源类型,也可以给资源自定义一个类型,如:“mytype”。不过两者在调用方式上有些不同(在后面示例“存取资源文件中的位图”中有详细描述)。
2.根据 RC 脚本文件编译成 RES 资源文件
在命令提示符中输入以下内容:
brcc32 FileName.rc //注:brcc32.exe在DelphiX/Bin目录中
3.在Delphi单元中加入资源文件
将生成的 RES 资源文件复制到相应程序所在的目录中,在单元文件中的“{$R *DFM}”后面加上“{$R FileName.res}”,编译后资源文件就被包含在可执行文件中了。
说明:如果嫌2、3两步麻烦,可以采用更简便的做法,即:将 RC 文件直接添加到项目中,在编译Delphi项目时,会自动编译该资源文件。
4.资源文件调用示例
(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;
请注意上面两种调用方式的不同之处。
(2)存取资源文件中的图标
将图标放在资源文件中,可以实现动态改变应用程序的图标。
//RC: testIcon icon res/test.ico
Application.Icon.Handle := LoadIcon(HInstance, 'testIcon');
(3)存取资源文件中的AVI动画
//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;