Código Delphi [-] procedure TForm2.QuickRep1AfterPreview(Sender: TObject); begin Close; end;
procedure TForm2.QuickRep1AfterPreview(Sender: TObject); begin Close; end;