delphi 资源文件管理 Resources and Images

来源:互联网 发布:人工智能最顶尖科学家 编辑:程序博客网 时间:2024/06/07 14:35

1、  把PNG图片放到项目中;

2、  点击主菜单“Project”→“ Resources and Images”,弹出下面的对话框

  它会自动识别项目中的图片、音频等文件自动添加进来,如果没有识别出来或者是自定义文件类型的话,就点击【Add】按钮手动添加,然后选择合适的资源类型ResourceType,然后在Resource Identifier中给资源取一个名字即可。

在代码中使用TResourceStream读取资源流:

stream := TResourceStream.Create(HInstance, 'PNGIMAGE_PAUSE',  RT_RCDATA);

DelphiXE中已经提供了Png解析库,uses pngimage,然后:

png := TPNGObject.Create;

png.LoadFromStream(stream);

 

下面是我封装的一个简单的从资源中读取PNG对象的方法:

function LoadPNGResource(resName:string):TPNGObject;

var

  png: TPNGObject;

  stream: TResourceStream;

begin

  png := TPNGObject.Create;

  stream := TResourceStream.Create(HInstance, 'PNGIMAGE_PAUSE',  RT_RCDATA);

  try

    png.LoadFromStream(stream);

  finally

    stream.Free;

  end;

  result := png;

end;

0 0
原创粉丝点击