Componente para pasar de .Bmp a .Jpg
 

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.

Encontre esto en delphi.about.com en ingles.
enlace 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;

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