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;
标签:stream,delphi,Resources,Images,TPNGObject,Create,png,TResourceStream From: https://www.cnblogs.com/sixty-five/p/17298301.html