delphi 怎么 将 jpg 转换成png 然后显示出来 是这样的我的jpg图片来自 stream的数据 是通过 服务器发过来的数据现在在客户端想通过 转换成png 图片显示 各位大神 有哪位知道的 求教 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 把png转为jpg或bmp,delphi不支持png,可以用第三方的 delphi 2009 开始内置支持 PNG 格式 uses jpeg, pngimage;procedure TForm1.Button1Click(Sender: TObject);var JPG: TJPEGImage; BMP: TBitmap; PNG: TPngImage;begin JPG := TJPEGImage.Create; BMP := TBitmap.Create; PNG := TPngImage.Create; JPG.LoadFromFile('C:\图片收藏\DIY\7副本.jpg'); // JPG.LoadFromStream(); 从流中载入的函数 BMP.Assign(JPG); PNG.Assign(BMP); PNG.SaveToFile('D:\111.PNG');end;LZ可以参考下 就是创建JPG BMP PNG 然后JPG载入数据 转 BMPBMP再转PNG 保存 D7不支持pngimage,可以找Tpngimage控件装上新版本都支持了~ 你可以把那个 BMP JPG PNG的创建变成全局的这样不用一直创建销毁 的确可以加速我写了一个局域网用的远程桌面就是这样转的 我做过类似的远程控制,如果要求效率的话还是传Gdi的信息吧。如一定要用传图片的方式,则需只需传送当前改变了的图片,没有改变的不需传送。一个桌面分成很多个小图片来传送。 类继承问题 为什么自定义控件在容器显示不正常? 有没有用于Unicode字符串的POS函数? XML 怎么做自定义格式的数据库文件,请高手指教!!! 有关长sql语句的写法,请高手指点!!! beforepost事件 midas 程序中的進程外組件如何卸載? 有没有学习dll比较好的资料? 合并单元格 如何在paintbox上显示gif图片,并让它动起来,急急.. delphi的panel面板被遮挡问题
jpeg, pngimage;procedure TForm1.Button1Click(Sender: TObject);
var
JPG: TJPEGImage;
BMP: TBitmap;
PNG: TPngImage;
begin
JPG := TJPEGImage.Create;
BMP := TBitmap.Create;
PNG := TPngImage.Create;
JPG.LoadFromFile('C:\图片收藏\DIY\7副本.jpg');
// JPG.LoadFromStream(); 从流中载入的函数
BMP.Assign(JPG);
PNG.Assign(BMP);
PNG.SaveToFile('D:\111.PNG');
end;LZ可以参考下 就是创建JPG BMP PNG 然后JPG载入数据 转 BMP
BMP再转PNG 保存
新版本都支持了~
这样不用一直创建销毁 的确可以加速
我写了一个局域网用的远程桌面
就是这样转的