[roman]

Usa el método GetFormImage de TForm para obtener un bitmap y luego el método SaveToFile del bitmap:

Código Delphi [-]
var
  Bitmap: TBitmap;

begin
  Bitmap:= GetFormImage();
  Bitmap.SaveToFile('archivo.bmp');
  Bitmap.Free;
end;

// Saludos