又一个报表问题(45分)

  • 主题发起人 主题发起人 plwei
  • 开始时间 开始时间
P

plwei

Unregistered / Unconfirmed
GUEST, unregistred user!
我自定义了一个报表预览。程序如下:
procedure RepForm.myReportOnPreviewEvent(sender:TObject);
begin
MyPreForm.QRPreview1.QRPrinter:=TQRPrinter(sender);
mypreForm.show;
end;
不知为什么编译时错误:
undeclared identifier "TQRprinter"
 
可能有几个单元没有引用,具体是哪几个我已记不得了。
 
好象不能这么用, 你是不是要选打印机? 用QUICKRPT1.RQPRINTER.PRINTERS和
PRINTERINDEX等属性选吧.
 
谁能告诉我怎么进行自定义报表预览吗?
希望详细一点。
 
unit 中加入QuickRep.
建立new form,加入Tpanel,Tspeedbutton(如zoom in,zoom out,
First Page,Next Page...等),TQRPreview.
建立yourself report form,在TQuickRep.onpreview中加入
yourPreviewForm.show.
欲更详细,请看delphi安装目录下有quickrtp子目录中的help资料.
 
接受答案了。
我将MyPreForm.QRPreview1.QRPrinter:=TQRPrinter(sender);
改为:
MyPreForm.QRPreview1.QRPrinter:=Quickrep1.qrprinter;
通过了。

 
后退
顶部