Jak skonwertować obrazek z *.bmp na *.jpg

Począwszy od Delphi 3 znajduje się moduł jpeg. To właśnie dzięki niemu można dokonać konwersji. Wystarczy dokonać takiej operacji:

var
  Bitmap : TBitmap;
  JPG : TJPEGImage;
begin
  try
    Bitmap := TBitmap.Create;
    Bitmap.LoadFromFile('C:\plik.bmp');
    JPG := TJPEGImage.Create;
    JPG.Assign(Bitmap);
    JPG.SaveToFile('C:\plik.jpg');
  finally 
    Bitmap.Free;
    JPG.Free;
  end;
end;

Zobacz także:

• Obsługa formatu JPEG