Lassen sich jpg's in bmp's konvertieren?

[Christian S.]

Hallo!

Das sollte (in etwa) so gehen:

Delphi-Quellcode:

var
  jpgImg : TJPEGImage;
  bmpImg : TBitmap;
begin
  jpgImg := TJPEGImage.Create;
  try
    jpgImg.LoadFromFile('c:\test.jpg');
    bmpImg := TBitmap.Create;
    try
      bmpImg.Assign(jpgImg);
      bmpImg.SaveToFile('c:\test.bmp');
    finally
      bmpImg.Free;
    end;
  finally
    jpgImg.Free;
  end;
end;

MfG
Peter