你 你若有情 Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-17 #1 数据库里只要一条记录,用QRBand制作一张报表,想数据库里这一条记录同时显示x(根据用户输入的数字为准)个同样的记录在一张纸上,但数据库里只有一条记录。怎么办!
P Pipi. Unregistered / Unconfirmed GUEST, unregistred user! 2002-03-17 #3 注意:TQuickRep.DataSet不要设置! 而TQRDBText放在 detail band 上,dataset、field按照正常设置 全局变量或者类成员 count:integer,在每次打印前设置为0 写QuickRep的OnNeedData事件 procedure TForm1.QuickRep1NeedData(Sender: TObject; var MoreData: Boolean); begin MoreData:=(count<5); //这里是重复5次,你自己改成需要的次数 count:=count+1; end;
注意:TQuickRep.DataSet不要设置! 而TQRDBText放在 detail band 上,dataset、field按照正常设置 全局变量或者类成员 count:integer,在每次打印前设置为0 写QuickRep的OnNeedData事件 procedure TForm1.QuickRep1NeedData(Sender: TObject; var MoreData: Boolean); begin MoreData:=(count<5); //这里是重复5次,你自己改成需要的次数 count:=count+1; end;