我有多行数据,想用quickreport分列打印,不用数据库,怎么实现

解决方案 »

  1.   

    是行转列的要求吧,象Access 中的交叉表一样吗,你的问题不是很清楚
      

  2.   

    quickreport 如何分成两栏

    ----------------------------------------------------------------------
    姓名      性别                     |姓名        性别
    -----------------------------------------------------------------------
    张三      男                       |李斯        女QR-->Properties Page: columns=2
    双击quickreport 在属性页中设置columns为2就行了在QuickRep1NeedData(Sender: TObject;var MoreData: Boolean);中写
    moredata:=true;
    with Query1 do
     begin
      if not eof then
        beign
          for i:=1 to 2 do
            if i=1 then 
              begin
               QRLabel1.caption:=fieldbyname('nmae').asstring;//张三
               QRlabel2.caption:=fieldbyname('sex').asstring;//男
              end;
            if i=2then 
              begin
               QRLabel3.caption:=fieldbyname('nmae').asstring;//李四
               QRlabel4.caption:=fieldbyname('sex').asstring;
              end;
             next;
           end;
          if eof then
             moredata:=false;
     end;