身份证大家都知道,我的A4的纸需要打印类试身份证一样的东西,一张A4的纸上放8张身份证,而且我数据库中有用户数据,而且一张A4的纸打印出来是8个不同的用户,当然打印的末页不足8个人的话也要打印出来,不知道fastReport怎么过,会做的进来顶顶,万分感谢!!

解决方案 »

  1.   

    没有搞过,曾经搞个什么rave,把人都弄死
      

  2.   

    在Delphi编程部分我们主要完成报表所需参数的传递,因为要在好几个过程中访问这些参数,所以要将这几个参数设为全局变量:
    private
    line1line2integer //保存行号
    inputXjintemp //入库小计 ,每5行后清零,下同
    outXjoutemp //出库小计
    CajiaXjcatempReal //差价小计
    下面是几个主要过程的代码清单。
    //单张表单数据合并过程
    procedure TInputForm.frDBDataSet1NextSender TObject
    var
    ReCountinteger
    begin
    ReCount = Adoruku.RecordCount
    Incline1// 该变量传至报表文件控制打印空行
    Incline2// 该变量控制清零小计值
    if not Adoruku.Eof then
    begin
    inputXj=inputXj+ADORuku.fieldByName'入库金额'.AsFloat
    outXj=outXj+Adoruku.fieldByName'出库金额'.AsFloat
    CajiaXj=CajiaXj+AdorukuJXCJ.AsFloat
    end
    //每5行后将小计值清零
    if line2 mod 5 = 0 and ReCount>line2 div 55 then
    begin
    intemp=inputXj
    outemp=outXj
    Catemp=CajiaXj
    inputXj=0
    outXj=0
    CajiaXj=0
    end
    //到达数据集末尾时给变量赋值
    if Adoruku.Eof then
    begin
    intemp=inputXj
    outemp=outXj
    Catemp=CajiaXj
    end
    end
    参考一下吧!
    要还有问题就看一下这个吧!
    http://www.qqread.com/cpp/q432195300.html
      

  3.   

    fastreport可以,分栏报表。在A4幅面的八分之一上设计你的数据区域。再把数据连接至数据库(取数据)。可页面分栏,也可区域分栏。