如何将aa.jpg文件转换为aa.bmp格式的文件? 谢谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.Button1Click(Sender: TObject);var jpg:TJpegImage;bmp:TBitmap;begin bmp:=TBitmap.Create; bmp.LoadFromFile('i:\aa.bmp'); jpg:=TJpegImage.Create; jpg.Assign(bmp); jpg.SaveToFile('i:\aa.jpg'); jpg.Free; bmp.Free;end; 您的例子好象是将aa.bmp转换为aa.jpg格式的了,而我需要将aa.jpg转换为aa.bmp格式的了, //反过来就行了,先uses jpegprocedure TForm1.Button1Click(Sender: TObject);var jpg:TJpegImage; bmp:TBitmap;begin jpg:=TJpegImage.Create; jpg.LoadFromFile('i:\aa.jpg'); bmp:=TBitmap.Create; bmp.Assign(jpg); bmp.SaveToFile('i:\aa.bmp'); jpg.Free; bmp.Free;end;我这没装Delphi,你试试 ado 连接 sqlserver2008 的问题 问两个关于程序安装的问题 如何将一个WideString中的Ascii码类型的字符转换为汉字的形式字符? 版本升级问题(分不夠再加) 最近项目比较多!有哪位兄台近期有空,可速联系! 有关DELPHI调用VC DLL 的问题! 长假放完,来上班,好不习惯哦!怀念在学校的日子... 提一个关于用Dcom/com/com+开发的问题。有实际开发经验者请赐教。 怎么获取常量的名字?第一个正确回答者给全部分! 权限问题请教 Delphi for .NET Preview 用不了:( 在项目开发中,各个模块用DLL调用,为什么全局变量调用不到?
var jpg:TJpegImage;bmp:TBitmap;
begin
bmp:=TBitmap.Create;
bmp.LoadFromFile('i:\aa.bmp');
jpg:=TJpegImage.Create;
jpg.Assign(bmp);
jpg.SaveToFile('i:\aa.jpg');
jpg.Free;
bmp.Free;
end;
而我需要将aa.jpg转换为aa.bmp格式的了,
procedure TForm1.Button1Click(Sender: TObject);
var
jpg:TJpegImage;
bmp:TBitmap;
begin
jpg:=TJpegImage.Create;
jpg.LoadFromFile('i:\aa.jpg');
bmp:=TBitmap.Create;
bmp.Assign(jpg);
bmp.SaveToFile('i:\aa.bmp');
jpg.Free;
bmp.Free;
end;
我这没装Delphi,你试试