Imprimir un formulario

[DarKraZY]

Hola Rafa,

Según el código fuente haces referencia al formulario mediante el objeto (o variable) "FResumenAnual". Ya que deduzco que el código fuente está en la misma clase de la cual forma parte este objeto, su referencia no es necesaria.

Me explico con un ejemplo visual

Código Delphi [-]
procedure TFResumenAnual.BImprimirClick(Sender: TObject);
begin
  // se imprime en horizontal, directamente desde el formulario (pantalla)
  if PrinterSetUpDialog1.Execute then
     begin
       PrintScale:=poPrintToFit;
       Print;
     end;
end;

De esta forma debería de funcionar bien en ambos casos.