Capturar un sector de un formulario y guardarlo como imagen

[testosi]

Estimados, he buscado mucho en los hilos con temas relacionados a lo que necesito pero no encuentro una solución a mi problema. Les detallo mi inconveniente:

Debo capturar un sector determinado de un formulario y guardarlo como imagen.
Desde ya muy agradecido por su ayuda.

Saludos.

[roman]

Puedes usar un objeto Bitmap y su método Bitmap.Canvas.CopyRect para copiar la porción deseada del formulario. Luego usas Bitmap.SaveToFile para guardar la imagen a un archivo.

// Saludos

[roman]

Aquí un ejemplito:

Código Delphi [-]
procedure SaveRect(Form: TForm; Source: TRect; FileName: TFileName);
var
  Bitmap: TBitmap;
  Dest: TRect;

begin
  Bitmap := TBitmap.Create;

  try
    Bitmap.Width := Source.Right - Source.Left;
    Bitmap.Height := Source.Bottom - Source.Top;
    Bitmap.PixelFormat := pf32bit;

    Dest := Rect(0, 0, Bitmap.Width, Bitmap.Height);
    Bitmap.Canvas.CopyRect(Dest, Form.Canvas, Source);
    Bitmap.SaveToFile(Filename);
  finally
    Bitmap.Free;
  end;
end;

La función recibe el formulario y la porción que requieres guardar y la guarda en el archivo indicado.

// Saludos

[testosi]

Muchas gracias roman, era lo que necesitaba. Funciona a la perfección.

Nuevamente muchas gracias.