件  
  在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下编程序一样，且还可以调用windows的API和资源。将资源文件----{$R myfist.res}加入。在Begin和end之间写下：  
writeln(''演示程序，按任意键开始！'');  
readln;  
playsound(pchar(''mywav''),hinstance,snd_sync or snd_resource);  
writeln(''演示结束！'');  
  运行程序，将弹出一个标准DOS窗口，按任意键播放声音文件。是不是很COOL呢!我曾下载过一个播放器，在其安装目录下我发现有一"DOS程序",用鼠标双击它便弹出一个DOS窗口，显示DOS时代特有的画图，并有背景音乐！可能就是用这个方法做的。  
3.Delphi本身自带了一个叫Image Editor的工具，同样可以编辑资源文本，但和本文的方法比较，可得出下表：  

**************************************  
Image Editor Brcc32  

BMP 只支持16位色 任意色  

光标 黑白两色 任意色  

ICO 只支持16位色 任意色  

AVI 不支持 支持  

WAV 不支持 支持  

字体  
字符串 不支持 支持  
其他  
****************************************  

  上面说的是直接在程序本身的调用。其实资源文件还有其它用法。比如说在你的程序携带其它文件，要用的时候释放出来。  
例如: myexe exefile ''ha1.exe''//脚本文件  
下面是自定义释放函数ExtractRes，本例中使用如下:  
ExtractRes(''exefile'',''myexe'',''c:\new.exe'');  
就把ha1.exe以new.exe为名字保存到C盘根目录下了.  

function TForm1.ExtractRes(ResType, ResName, ResNewName: string): boolean;  
var  
Res: TResourceStream;  
begin  
try  
Res := TResourceStream.Create(Hinstance, Resname, Pchar(ResType));  
try  
Res.SavetoFile(ResNewName);  
Result := true;  
finally  
Res.Free;  
end;  
except  
Result := false;  
end;  
----------------------------------------------------------------------  
  
     (二)中级应用篇:  
  上面我们已经知道如何把一副BMP图像从资源文件里面读出来,但是BMP文件太大了,JPG文件应用的相对较多.那么如何把JPG图像读出来呢?用资源文件加流方式即可。具体方法如下:  
(1)MyJpg JPEG　My.JP