TJPEGImage *jp = new TJPEGImage(); try { jp->Assign(Image1->Picture->Bitmap); jp->SaveToFile("c:\\converted.jpg"); } __finally { delete jp; }