tbitmap kann nur bmp

[pilic]

Musst du gar nicht!

Delphi-Quellcode:

jpeg:=TJPEGImage.Create;
 try
   jpeg.LoadFromFile(Filename);
   bmp:=TBitmap.Create;
   try
     bmp.Assign(jpeg);
     bmp.SaveToFile('blabla.bmp'));
   finally
     bmp.free;
   end;
 finally
   jpeg.free;
 end;

Edit:

Oops falsch herum

Delphi-Quellcode:

uses jpeg;
...
  Jpg:=TJpegImage.Create;
  try
    Jpg.CompressionQuality:=88;
    Jpg.Assign(bmp2);
    Jpg.SaveToFile('deinjpeg.jpg');
  finally
    jpg.free;