Delphi中如何实现QRPreview控件的翻页功能？(100分)

将做好的QuickRep报表的显示输出到QRPreview控件中，例如：
QRPreview.QRPrinter:=QuickRep.QRPrinter；
若有多页应如何翻页查看？

在QuickRep的OnPreview事件里——
procedure TForm1.QuickRep1Preview(Sender: TObject);
begin
QRPreview1.QRPrinter := TQRPrinter(Sender);
end;
翻页可以用QRPreview1.PageNumber结合QRPreview1.QRPrinter.PageCount来控制。

接受答案了.