播放本地多种格式的图片

播放本地多种格式的图片，并保存图片 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;