本文整理自网络，侵删。
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;
相关阅读 >>
Delphi winapi: getwindowtextlength - 获取窗口标题长度
更多相关阅读请进入《Delphi》频道 >>
