岁数大了，QQ也不闪了，微信也不响了，电话也不来了，但是图老师依旧坚持为大家推荐最精彩的内容，下面为大家精心准备的Delphi中使用资源文件，希望大家看完后能赶快学习起来。
【 tulaoshi.com - 编程语言 】
目的,在Delphi中使用资源文件
本例是将一个Flash动画加到我的们程序中,在程序启动时再释放出来.
先新建一个文件文件
写入内容:另存为:SwfFile.rc
然后用brcc32.exe生成资源文件.res
然后在Delphi中加入一行(最后一行)
implementation
{$R *.dfm}
{$R SwfFile.RES}//就是这行
procedure FlashResToFile(const ResName, ResType, FileName: string);
var
FlashRes: TResourceStream;
begin
FlashRes := TResourceStream.Create(HInstance, ResName, PChar(ResType));
try
FlashRes.SaveToFile(FileName); //将资源保存为文件，即还原文件
finally
FlashRes.Free;
end;
end;
FlashResToFile('FLASH', 'SwfFile1', 'Thanks.SWF');
ShockwaveFlash1.Movie := ExtractFilePath(ParamStr(0)) + 'Thanks.SWF';
ShockwaveFlash1.Play;
来源:http://www.tulaoshi.com/n/20160219/1603902.html
看过《Delphi中使用资源文件》的人还看了以下文章 更多>>
