怎样将图片的文件类型由BMP改为JPEG?
来源:百度知道 编辑:UC知道 时间:2024/05/21 15:43:17
用下面这段代码就可以实现这种转换。
procedure TForm1.Button1Click(Sender: TObject);
Var
jpeg: TJPEGImage;
bmp: TBitmap;
Begin
bmp:= TBitmap.Create;
try
bmp.LoadFromFile( 'e:\car.bmp' );
jpeg:= TJPEGImage.Create;
try
jpeg.Assign( bmp );
jpeg.compress;
jpeg.SaveTofile( 'e:\car.jpg');
finally
jpeg.free
end;
finally
bmp.free
end;
end;
ACDSee使用小技巧
转换图片格式
ACDSee可以成批转换图片格式,转换方法是:选中Browses窗口内需要转换格式的图片,单击"Tools"菜单下的"Convert"命令,弹出图片格式转换对话框。你可以在"Format"框内选中要转换的图片格式,对于JPG等格式,你可以单击"Format settings"按钮设置压缩率等参数。而"To folder"框显示转换后的图片保存位置,你可以单击"Browse"按钮选择其他文件夹。右下角的"Overwrite existing"下拉列表用来设定"To folder"文件夹有同名文件时的覆盖方式,选择"Ask"进行询问、"Rename"自动更名、"Skip"