Go homepage(回首页)
Upload pictures (上传图片)
Write articles (发文字帖)

The author:(作者)aaa
published in(发表于) 2014/7/19 0:14:41
构成Delphi工程的文件:资源文件(.res)

构成Delphi工程的文件:资源文件(.res)

资源文件(.res)

资源文件的扩展名为.res,资源文件可以将应用程序用到的资源(如声音、图像等)包含进来,应用程序调用资源文件编译后,可以将资源编译到.exe 文件中。

1.建立资源文件

在此以创建一个声音的资源文件为例进行具体讲解。

(1)新建一个文本文件,录入代码如下:


Sound wav Sound.wav

其中“Sound.wav”为一个Windows 下普通的声音文件。

(2)将文本文件保存为名字为Sound.rc 的RC 的文件。RC 文件是资源的源文件,编译器编译这些文件,生成.res 的资源文件。

(3)将Sound.rc 编译生成资源文件。找到Brcc32.exe 文件所在地址,一般都在Delphi 7 安装盘的BorlandDelphi7Bin 目录下。在DOS 的提示符下运行Brcc32.exe 文件目录,代码如下:


brcc32 Sound.rc

运行完毕后,在当前目录内生成的Sound.res 资源文件已经将Sound.wav 声音文件编译成资源文件了。

用Image Editor 软件如同建立图像文件一样,可以方便地建立图像的资源文件。

2.调用资源文件

调用资源文件的代码如下:


{$R *.DFM}

{$R Sound.res} //在此声明Sound.res 资源文件

读取资源文件,并播放声音。代码如下:


procedure TForm1.FormCreate(Sender: TObject);

var

hResInfo :THandle;

begin

hResInfo := FindResource(HInstance,’Sound’,’wav’);

hRes := LoadResource(HInstance, hResInfo);

If hRes > 32 Then

begin

PtrSound :=LockResource(hRes);

end;

end;

procedure TForm1.Button1Click(Sender: TObject);

begin

SndPlaySound(PtrSound,Snd_Async or Snd_Memory);

end;


If you have any requirements, please contact webmaster。(如果有什么要求,请联系站长)





QQ:154298438
QQ:417480759