imagen jpg a bitmap

[Black_Ocean]

josi,

Vaya pregunta, como dijo el amigo anterior, parece que te estás iniciando en Delphi. Mira, intentaré explicarte paso por paso el ejemplo señalado por el amigo de arriba.

Pondremos el código anterior en el evento OnClic del objeto Button1 de clase TButton (en resumen, un básico botón), cuyo código es el método que utilizaremos en respuesta a dicho evento, es decir en este caso, que el evento se generará cuando hagamos clic izquierdo del mouse (left clic) sobre el botón, el cuál quedaría así:

Código Delphi [-]
uses
  Graphics, JPEG;

procedure TForm1.Button1Click(Sender: TObject);
var
  j: TJPEGImage; // Variable de tipo TJPEGImage, que son contenedores para imágenes JPG/JPEG
  b: TBitmap; // Variable de tipo TBitmap, que son contenedores para imágenes BMP
begin
  j:= TJPEGImage.Create; //Creamos el objeto de clase TJPEGImage en la memoria
  b:= TBitmap.Create; //Creamos el objeto de clase TBitmap en la memoria
  try
    j.LoadFromFile('C:\Imagen.jpg'); //Cargamos al objeto de clase TJPEGImage una imagen deseada de formato Jpg/jpeg desde un archivo externo.
    b.Assign(j); // Asignamos (copiamos) la imagen contenida en el objeto de clase TBitmap al objeto de clase TJPEGImage que habíamos cargado anteriormente.
    b.SaveToFile('C:\Imagen.bmp'); //Guardamos al disco duro el archivo en formato BMP que es el que requerías.
  finally
    b.Free; //Liberamos el objeto de tipo TBitmap de la memoria porque, en este caso, ya no lo usaremos más
    j.Free; //Liberamos el objeto de tipo TJPEGImage de la memoria porque, en este caso, ya no lo usaremos más
  end;
end;

Espero que te sirva esta pequeña explicación.

Saludos =)