delphi 2010 ListImage动态添加png图片
delphi2010，虽然支持了png格式，但是imagelist的add方法也只支持添加bitmap类型，在编译期可以直接将png加入imagelist，但在程序的运行...
delphi2010，虽然支持了png格式，但是imagelist的add方法也只支持添加bitmap类型，在编译期可以直接将png加入imagelist，但在程序的运行期呢？这个该如何解决呢？请大家帮我看看，谢谢
展开
2个回答
展开全部
uses ...PngImage;
procedure PNGtoBMP(png,bmp:string);
var
png:Tpngobject;
bmp:Tbitmap;
begein
png:=Tpngobject.create;
png.loadFile(png);
bmp:=Tbitmap.create;
Bmp.width:=png.Width;
Bmp.height:=png.Height;
png.draw(bmp,bmp.canvas.ClipRect);
bmp.savefile(bmp);
FreeAndNil(png);
FreeAndNil(bmp);
end;
做一个转换处理。
procedure PNGtoBMP(png,bmp:string);
var
png:Tpngobject;
bmp:Tbitmap;
begein
png:=Tpngobject.create;
png.loadFile(png);
bmp:=Tbitmap.create;
Bmp.width:=png.Width;
Bmp.height:=png.Height;
png.draw(bmp,bmp.canvas.ClipRect);
bmp.savefile(bmp);
FreeAndNil(png);
FreeAndNil(bmp);
end;
做一个转换处理。
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
博思aippt
2024-07-20 广告
博思AIPPT是基于ai制作PPT的智能在线工具，它提供了4种AI制作PPT的方式，包括AI生成大纲、AI直接生成PPT、文本生成PPT、AI提炼word文档生成PPT，一站式集成多种AI生成PPT的方式，可满足办公用户的不同需求和使用场景...
点击进入详情页
本回答由博思aippt提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
|
广告 您可能关注的内容 |
