我在报表的每一页设定了记录数为十,不足的补空行打印
现在客户需要我将空行部分用表格填满,使报表看起来整齐
请问怎么实现!

解决方案 »

  1.   


            inc(i);//i是一個全局變量 
    //qr不要設置dataset(即為空),BeforePrin裡面dataset.first;//設置為第一記錄
    //在onneeddata裡面,
    //因為以前搞過,都過了比較久了,你試試看看行不行
            if not ADOQuery1.Eof then
            begin
                    QRLabel2.Caption:=ADOQuery1.Fields[1].AsString;
                    QRLabel3.Caption:=ADOQuery1.FieldByName('SL').AsString;//+ADOQuery1.FieldByName('DW').AsString;
                    ADOQuery1.Next;                if i<=20 then
                    MoreData:=true
                    else
                    begin
                    QuickRep1.NewColumn;
                    i:=0;
                    MoreData:=true;
                    end;
            end
            else
            begin
                    QRLabel2.Caption:='';
                    QRLabel3.CaptioN:='';                if i=20 then
                    MoreData:=false;
            end;
    你参考一下
      

  2.   

    在OnNeedData中写代码。
    或者控制数据集也可以呀。
      

  3.   

    好像只能动态判断, 跟WWWWA的方法差不多