習慣VCL的做法了，到了FireMonkey里面，好像查不到單獨的JPEG單元了，不少朋友就郁悶如何處理JPG了，這么大件事，不可能沒有處理方法的，具體就請看代碼：



uses?FMX.Surfaces;

procedure?TForm1.Button1Click(Sender:?TObject);
var
??Surf:?TBitmapSurface;
??Stream:?TMemoryStream;
begin
??Surf?:=?TBitmapSurface.Create;
??Surf.Assign(Image1.Bitmap);
??Stream?:=?TMemoryStream.Create;
??try
????TBitmapCodecManager.SaveToStream(Stream,?Surf,?'.jpg');
????Stream.SaveToFile(ExpandFileName('~/Test.jpg'));
??finally
????Stream.Free;
????Surf.Free;
??end;
end;


原文地址：http://qc.embarcadero.com/wc/qcmain.aspx?d=108621

轉載于:https://www.cnblogs.com/zhqian/p/4074107.html

總結

以上是生活随笔為你收集整理的FireMonkey 保存图片到JPG的方法 BMP转JPG的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。