Delphi 保存导出或加载资源文件

本文整理自网络，侵删。

 
procedure SaveResourceTofile(aFileName, aResName: string);
var
  stream: TResourceStream;
begin
  try
    stream := TResourceStream.Create(HInstance,aResName,RT_RCDATA);
    stream.SaveToFile(aFileName);
    //aImage.Picture.Graphic.LoadFromStream(stream);
    //stream.Free;
  finally
   // aImage.Picture := nil;
    stream.Free;
  end;
end;


procedure TForm1.Button1Click(Sender: TObject);
begin
SaveResourceTofile('PngImage_1.png','PngImage_1');
end;
 

相关阅读 >>

Delphi 简单的登录窗口

Delphi 安卓app的http访问权限

Delphi 自带的 base64 编解码函数

Delphi 动态内存查找法

Delphi android / ios应用程序中使用tgeocoder类进行反向地理编码（从位置信息中获取地址）

Delphi文本数据导入数据库的方法

Delphi 指针入门知识

Delphi application.title在win7下失效了？

Delphi idhttp 设置cookie 和访问后读取cookie 值

Delphi 62 进制的简单实现

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi 保存导出或加载资源文件