资源说明:播放本地多种格式的图片,并保存图片
if SaveDialog1.Execute then
with TLinearBitmap.Create do
try
Assign(Image1.Picture.Bitmap);
// To compress JPEG2000 files to 5% of raw bitmap size, set
// ImageDLLLoader.Default.CompOptions:='rate=0.05';
SaveToFile(SaveDialog1.FileName);
finally
Free;
end;
本源码包内暂不包含可直接显示的源代码文件,请下载源码包。