Componente para pasar de .Bmp a .Jpg

[zugazua2001]

Hola, yo me estaba complicando la vida intentando grabar .BMP, pero este tipo de archivo es muchisimo mas grande que .JPG.
Alguien sabe de algun componente para pasar de .BMP A .JPG.
Desde ya muchisimas gracias. Es increible lo que me han ayudado.

[JXJ]

Encontre esto en delphi.about.com en ingles.
enlace

http://delphi.about.com/cs/adptips2001/a/bltip0301_3.htm

You can easily convert a BMP image to a JPG (JPEG) image:
~~~~~~~~~~~~~~~~~~~~~~~~~
{

Código Delphi [-]
Usage:

BMPtoJPG('mybitmap.bmp','myjpeg.jpg')
}

function BMPtoJPG
   (var BMPpic, JPGpic: string):boolean;
var Bitmap: TBitmap;
    JpegImg: TJpegImage;
begin
  Result:=False;
  Bitmap := TBitmap.Create;
  try
   Bitmap.LoadFromFile(BMPpic) ;
   JpegImg := TJpegImage.Create;
   try
    JpegImg.Assign(Bitmap) ;
    JpegImg.SaveToFile(JPGpic) ;
    Result:=True;
   finally
    JpegImg.Free
   end;
  finally
   Bitmap.Free
  end;
end;

[Neftali [Germán.Estévez]]

Una símple búsqueda en los foros y encontrarás la respuesta:
http://www.clubdelphi.com/foros/showthread.php?t=19613