Delphi 编程中资源文件的应用:初级应用篇
资源文件一般为扩展名为 res 的文件.在 VC 中资源文件用得非常普遍,但 Delphi 在其联机帮助中对资源文件没作什么介绍,其实利用其自带的资源编译工 具 BRCC32.EXE(一般位于\Delphi\BIN 目录下) ,我们完全可以做出跟 VC 一样效 果的文件来。 资源文件最大的好处是能将一些在必要时才调用的文件跟可执行文件一起 编译,生成一个文件.这样做最大的好处就是使外部文件免遭破坏.例如在一条程 序中你要临时调用一幅图片,一般作法是把图片放在某一路径下(通常是主程序 所在路径),但如果用户路径误删你的图片文件,则可能使程序找不到相应文件而 出错崩溃.另外,如果你想自己的程序界面美观,想用一些自定义光标,也要用到资 源文件。
资源文件的使用步骤为: 一.编写 rc 脚本文本 用记事本或其它文本编辑器编写一个扩展名为 rc 的文件。例如: mycur cursor move.cur //加入光标 mypic Bitmap Water.BMP //加入位图 mywav WAVE happy.wav //加入声音 myAVI AVI EPOEN.AVI //加入视频 myIco ICON CJT.ICO //加入图标
格式分别为在资源文件中的名称->类型->实际文件名称,例如上面第一行定 义一个名为 mycur 的光标,实际名称为加入光标 move.cur.
二.将 rc 文件编译成 res 资源文件 将脚本文件和实际文件拷到 Brcc32.EXE 所在目录, 执行 DOS 命令。 格式为: Brcc32 脚本文件(回车),例如有一名为 myfirst.rc 的脚本文件,则执行 Brcc32 myfirst.rc(回车)即可。如果你是懒人,也可新建一批处理文件,内容只有一行:
Brcc32 mufist.rc.(因为 Delphi 安装后一般会在自动批处理文件中指明
搜索路径 的。)如果编译成功,则会生成一个结尾为 res 的文件,这个文件就是我们需要的 资源文件。
三.在
Delphi 单元中加入资源文件 将生成的 res 资源文件拷贝到你所编程序的路径下,在单元文件{$R *DFM} 后加上一句{$R mufirst.res},则将 res 文件加入去,编译后资 源文件即已包含在 可执行文件中了。若你有多个资源文件,也按上法依次加入。
四.在 Delphi 程序中调用资源文件 资源文件在 Delphi 中的关键字为 hinstance.下面给出具体用法. 1.光标的调用 首先在程序中定义一个值大于 0 的常量,因为 Delphi 本身用 0-负 16 来索引 默认的光标, 所以我们制定的光标应从表面上 1 开始索引。 然后在窗口的 Oncreat 事件中添加以下代码: 其中 35 为大于 1 的常量,mycur 为光标在资源文件中的名字。如果希望在 其他控件上使用定制光标, 例如 Panel 控件, 只需在程序的适当处加入以下代码: begin mymap:=LoadBitmap(hinstance,'mypic'); Image1.picture.Bitmap.Handle:=mymap; end; 其中"mypic"为位图资源文件中的名称。
3.AVI 文
件的调用 新建一工程,添加一 Animate 控件,在需要的地方加入: animater1.Active:=true; 其中 myAVI 为视频文件在资源文件中的名称。
4.调用 WAV 文件
在 uses 中加入 mmsystm 单元,以便在
程序中播放 WAV 文件。播放时 Playsound(pchar('mywav'),hinstance,sndsync or snd_resource);其中 mywav 为声音文 件在资源中的名称。
5.加入光标 加入光标比较容易,只要将 res 文件加入单元文件中即可。但需注意,名称最 好取"W"."WW"等,使第一个字母尽量靠后,以免与主程序的图标顺序颠倒。这 样一来,别人在使用你的程序时如果想选择其它图标就有很多选择了。 补充: 1.资源类型除上述类型外,还可以字体文件,字符串文件等。 2.资源文件不但可以在标准图形界面下使用还可在控制台下使用。 下面我们来试验一下: 新建一工程,将唯一的一个 Form 删除,然后修改工程文件。增加一句 {$Apptype console},在 uses 子句中加入 mmsystem,并将其它引用单元删掉。将 Begin 和 end 之间语句删掉。至此,我们就可和 Turbo PASCAL 下编程序一样, 且还可以调用 window