不是我的机器坏,
“一幅3434x2345的BMP图像转换JPG格式”这只是我举的一个例子
如果对于大图像,用下面的方法就会出现问题:
var
MyJpeg: TJpegImage;
Image1: TImage;
begin
Image1:= TImage.Create(self);
MyJpeg:= TJpegImage.Create;
Image1.Picture.Bitmap.LoadFromFile('c:/windows/desktop/aa.BMP'); // Load the Bitmap from a file
MyJpeg.Assign(Image1.Picture.Bitmap); // Assign the BitMap to MyJpeg object
MyJpeg.CompressionQuality:=StrToInt('75');
MyJpeg.Compress;
MyJpeg.SaveToFile('c:/windows/desktop/test.JPG'); // Save the JPEG to Disk
end;