[[Héctor Randolph]]

Aquí les dejo el código de una pequeña prueba que hice. Coloqué un reporte y un botón dentro del formulario. La idea es capturar el evento que se genera al cerrar la vista previa.

Código Delphi [-]
type
  TForm1 = class(TForm)
    QuickRep1: TQuickRep;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
    procedure QuickRep1BeforePrint(Sender: TCustomQuickRep;
      var PrintReport: Boolean);
  private
    { Private declarations }
     procedure CerrarPreview(Sender: TObject; var Action: TCloseAction);
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.QuickRep1BeforePrint(Sender: TCustomQuickRep;
  var PrintReport: Boolean);
var
 I: Integer;

begin
  for I:=0 to Screen.FormCount-1 do
  begin
    if Screen.Forms[i].ClassName='TQRStandardPreview' then
    begin
      Screen.Forms[i].OnClose:=CerrarPreview;
    end;
  end;
end;

procedure TForm1.CerrarPreview(Sender: TObject; var Action: TCloseAction);
begin
  ShowMessage('Se cerró el formulario de la vista previa.');
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  QuickRep1.Preview;
end;

end.

Saludos