Question

请问有没有Delphi XE5 for Andriod 下操作JPEG的方法，比如说将Bitmap转换为JPEG格式

Answer 1

uses FMX.Surfaces, var Surf: TBitmapSurface; bmp: tbitmap; mm: TMemoryStream;begin bmp := tbitmap.create; try bmp .loadfromfile('****'); //加载图片 bmp png... mm := TMemoryStream.Create; Surf := TBitmapSurface.Create; try Surf.Assign(Surf); TBitmapCodecManager.SaveToStream(mm, Surf, '.jpg'); //根据后缀 可保存成其它格式 如 bmp png mm.savetofile('***'); finally Surf.Free; mm .free; end; finally bmp.free; end;end;

Answer 2

没有

。