报表问题

Question

我有个报表，有单头和单身。我一次要打印多条记录，但页码（页数）是显示总数量和当前第几页，但我要的是：一个单头和单身为总页数和第几页数（比如：一人单是一条记录，单身有几十50个，每页可打印10条单身记录，这样的话要分五页打印，页数为一至五页，共五页）打第二个单头的时候也是一样，请问怎么设计，谢谢，

Answer 1

你必须计算出你的数据需要打印多少页，并且知道在哪里开始要换页
比如设一个变量iPageNo控制当前打印的页数，iPagesSum控制总页数
然后进行循环打印
for iPageNo:=0 to iPagesSum - 1 do
begin
  frReport1.Pages.Add;
  page := frReport1.Pages[iPageNo];
  从这里开始循环取数据，打印页面
end