怎样将jpeg图像转换为bmp，急呀，绝对高分

Question

怎样将jpeg图像转换为bmp，急呀，绝对高分

Answer 1

uses jpeg;var Jpg1:TJpegImage;
    bmp1:TBitmap;
begin
  bmp1:=tbitmap.Create;
  Jpg1:= TJpegImage.Create;
  jpg1.LoadFromFile('c:\1.jpg');
  bmp1.Assign(jpg1);
  bmp1.SaveToFile('c:\test.bmp');
  jpg1.Free;
  bmp1.Free;
end;

Answer 2

program Project1;{$APPTYPE CONSOLE}uses
  SysUtils, JPEG, Graphics;var
  Jpg: TJPEGImage;
  Bmp: TBitmap;
begin
  Jpg:=TJPEGImage.Create;
  Bmp:=TBitmap.Create;
  try
    Jpg.LoadFromFile('1.jpg');
    Bmp.Assign(Jpg);
    Bmp.SaveToFile('1.bmp');
  finally
    Jpg.Free;
    Bmp.Free;
  end;
end.