sourceImage = openBitMap  "d:\\testimage.bmp"
outputImage = bitmap sourceImage.width sourceImage.height
copy sourceImage outputImage
outputImage.fileName = "d:\\testImage.jpg"
JPEG.setQuality 99
save outputImage

--BitmapIO

相关文章: