怎么在exe和dll中存取图片和声音，望诸位大虾不吝赐教，万分感谢

16位的Delphi 1.0和32位的Delphi2.0、3.0都提供了资源 
编译工具，其中 Delphi 1.0的资源编译器叫BRCC.EXE，Delphi 2.0的资源编译器 
叫BRCC32.EXE 用来编译32位资源，所有资源编译器都只提供了命令行版本， 
没有提供Windows 版本。制作一个资源一般要通过以下几个步骤： 0D
1)编写.RC文件 
..RC文件是资源的源文件，编译器也就编译这个文件，生成.RES的资源文件 
首先在我们的项目子目录中建立一个纯文本文件，起名叫Sound.rc，文件中 
有一行，内容为： 
SOUND1 WAV SOUND.WAV 
其中SOUND.WAV为一个Windows下普通的声音文件 
2)编译它 
在DOS的提示符下打 BRCC SOUND.RC 硬盘哗啦啦转一会儿后，就编译完了 
3)制作程序 
这也是最复杂，最灵活的一步，首先启动Windows, 再启动Delphi， 并且将项目 
中的文件保存到我们的项目中的子目录中。 在Unit1.pas中找这么一行 
{$R *.DFM} 
把我们的资源文件就声明在后面 0D
{$R SOUND.RES} 
然后，在Form1中声明两个全局变量 
PtrSound : PChar; 
hRes : THandle; {handle to the loaded resource 
if 0 indicates nothing playing} 
再在Form1的Create事件中写下如下代码 
procedure TForm1.FormCreate(Sender: TObject); 
var hResInfo : THandle; 
begin 
hResInfo := FindResource(HInstance, ’SOUND1’, ’WAVE’); 
hRes := LoadResource(HInstance, hResInfo); 
if hRes > 32 then {its a good load} 
begin {lock the resource} 
0AptrSound:=LockResource(hRes); 
end; 
end; 
然后在Form1中放一个按钮Button1，写如下代码： 
procedure TForm1.Button1Click(Sender: TObject); 
begin 
sndplaysound(ptrSound,snd_async or snd_Memory); 
end; 999999999999999999999999999999999999999999999999999
999999999999999999999999999999999999999999999999999
99999999999B@B@B@BBBMMMM999999999999999999999999999
999999999999M+:.:+9999M:999999999999999999999999999
9999999999999MM9+99MMM:9999999999999999999999999999
99999999999999M+.+99M:99999999999999999999999999999
99999999999999B:.++9M:99999999999999999999999999999
99999999999999B+.+99M:9999AAAAAA9999999999999999999
99999999999999B:.++9M:9AAA++++:+AAA9999999999999999
99999999999999B+.+99M:A+9+A:+++++9AA999999999999999
99999999999999B:.++9:A+@+A:,:++9+A9@M99999999999999
99999999999999B+.+9:A+A,,,,,,+A+A9@A@M9999999999999
99999999999999B:.++A+A+,,.,,+A9A9@A@M@M999999999999
99999999999999B+.+9AA+,,...,++A9@A@A@MM999999999999
99999999999999B:.+:A+++,,.,,++9@A@A@M@M999999999999
99999999999999B+.+A+@+,,,,,+9A@A+@@M@M@M99999999999
99999999999999B:.+A@+++,+,+9A9A++@M@M@MM99999999999
99999999999999B+.+A+@++++++A9A++9M@M@M@M99999999999
99999999999999B:.+A@+@+:+9A9A9A9M@M@M@9M99999999999
0A999999999999B+.+A+@+@+@+@+@A@A@9@9@9@M99999999999
99999999999999B:.+A@+@+@+@+@+@A@M@9@9@9M99999999999
99999999999999B+.+:A@+@+@+@+@A@M@9@9@9M999999999999
99999999999999B:.+:A9@+@+@+@9@A@M@9@9@M999999999999
99999999993333333333M9@9@9@9@9@M@9@9@9M999999999999
99999999993.........MAA99@9@9@M@9@9@9M9999999999999
99999999993...MMMM..MM@9@9@9@9@M@9@9M99999999999999
99999999993....MMM..M:M@9@9@9@9@9@9M999999999999999
99999999993...MMMM..M:9MMM@9@9@9MMM9999999999999999
99999999993..MMM.M..M:9999MMMMMM9999999999999999999
99999999993..MM.....M:99999999999999999999999999999
99999999993..M......M:99999999999999999999999999999
99999999993...M.....MM:9999999999999999999999999999
99999999993.........M9M:999999999999999999999999999
9999999999MMMMMMMMMMMMMM:99999999999999999999999999
999999999999999999999999999999999999999999999999999
999999999999999999999999999999999999999999999999999
999999999999999999999999999999999999999999999999999
999999999999999999999999999999999999999999999999999
999999999999999999999999999999999999999999999999999
999999999999999999999999999999999999999999999999999
99999999999999999999.9999999.9999999999999999999999
9999999....999999999.9999999.99999.999999..99999999
9999999.999.99999999.9999999.99999999999.9999999999
9999999.9999.99...99.9....99....99.9999.99999999999
9999999.9999.9.999.9.9.999.9.999.9.9999....99999999
9999999.9999.9.....9.9.999.9.999.9.9999.999.9999999
9999999.9999.9.99999.9.999.9.999.9.9999.999.9999999
9999999.999.99.999.9.9.999.9.999.9.9999.999.9999999
9999999....9999...99.9....99.999.9.99999...99999999
9999999999999999999999.9999999999999999999999999999
9999999999999999999999.9999999999999999999999999999
999999999999999999999999999999999999999999999999999
999999999999999999999999999999999999999999999999999
999999999999999999999999999999999999999999999999999
999999999999999999999999999999999999999999999999999
999999999999999999999999999999999999999999999999999
999999999999999999999999999999999999999999999999999
9999