Código Delphi [-]Qreport.Print; cambiarlo por: QReport.Preview;
Qreport.Print; cambiarlo por: QReport.Preview;