Puedes utilizar otro TImage, por ejemplo, para guardar la imagen creada, utilizando algo como esto:
Código Delphi
[-]
Image2.Picture.Bitmap.Height := Image1.Picture.Bitmap.Height ;
Image2.Picture.Bitmap.Width := Image1.Picture.Bitmap.Width;
Image1.Picture.Bitmap.Canvas, Image1.Picture.Bitmap.Canvas.ClipRect);
Image2.Picture.Bitmap.SaveToFile('c:\temp\1.bmp');
En este caso se utiliza un BMP; Puedes guardar en JPG y en PNG si estás con la última versión de Delphi que ya lo soporta.