Otra alternativa es que crees tu propio visualizador de informes, es muy sencillo:
Debes colocar en un form el componente TQRPreview.
Ahora el codigo:
Supongamos que tu informes se llama QuickRep1 y nuestro componente de visualizacion es QRPreview1.
Esto es lo que debes hacer:
Código Delphi
[-]
procedure TForm1.cmdOpenReportClick(Sender: TObject);
begin
QuickRep1.Preview;
end;
procedure TForm1.QuickRep1Preview(Sender: TObject);
begin
QRPreview1.QRPrinter:=TQRPrinter(Sender);
end;
procedure TForm1.cmdPrintSetupClick(Sender: TObject);
begin
QRPreview1.QRPrinter.PrintSetup;
end;
procedure TForm1.cmdFirstPageClick(Sender: TObject);
begin
QRPreview1.PageNumber:=1;
end;
procedure TForm1.cmdLastPageClick(Sender: TObject);
begin
QRPreview1.PageNumber:=QRPreview1.QRPrinter.PageCount;
end;
procedure TForm1.cmdPrevPageClick(Sender: TObject);
begin
QRPreview1.PageNumber:=QRPreview1.PageNumber-1;
If (QRPreview1.PageNumber<0) Then
QRPreview1.PageNumber:=1;
end;
procedure TForm1.cmdNextPageClick(Sender: TObject);
begin
If (QRPreview1.PageNumber+1>=QRPreview1.QRPrinter.PageCount) Then
QRPreview1.PageNumber:=QRPreview1.PageNumber+1;
end;
procedure TForm1.cmdPrintClick(Sender: TObject);
begin
QRPreview1.QRPrinter.Print;
end;
Es un metodo muy sencillo para visualizar los informes Quicreport, el cual tu puedes personalizar y darle la forma que desees.
Saludos