In Image zeichnen

[Wuaegner]

Hilfsbereit wie ich bin
spuckte die Suche folgendes aus:

Code:

var 
  jpgImg : TJPEGImage; 
  bmpImg : TBitmap; 
begin 
  jpgImg := TJPEGImage.Create; 
  try 
    jpgImg.LoadFromFile('c:\test.jpg'); 
    bmpImg := TBitmap.Create; 
    try 
      bmpImg.Assign(jpgImg); 
      bmpImg.SaveToFile('c:\test.bmp'); 
    finally 
      bmpImg.Free; 
    end; 
  finally 
    jpgImg.Free; 
  end; 
end;