关于QuickReport的一个高级问题

报表如果帮定太困难的话,可以采用程序控制的方式,也就是在 onneeddata 事件里面编写代码
例如:
在 QuickRep 的 OnNeedData里添加以下代码procedure TfrmNeedData.QuickRep1NeedData(Sender: TObject;
  var MoreData: Boolean);
begin
// 全局变量 i 控制座位
  inc(i);
  if i<14 then
    begin
      moredata:=true;
      QRLabel1.Caption :=inttostr(i);
    end
  else
    moredata:=false;
end;
请参阅 dephi5 自带的报表打印例子，上面就是这样的例子！