高手求急!用fastreport实现报表,我用的是frprnttbl控件,想在报表数据后增加合计行,在程序中如何实现?多多感谢!

解决方案 »

  1.   

    http://218.56.11.178:8018/FileDown.aspx?FID=175
      

  2.   

    看过了上面没有这个介绍
    procedure TFrmPrntSet.BitBtnPreviewClick(Sender: TObject);
    var i: integer;
        FieldString: string;
    begin
      FieldString:='';
      for i:=0 to ChkLstSumFlds.Count-1 do
      begin
        if ChkLstSumFlds.Checked[i] then
          FieldString:=FieldString+'[SUM(['+SrcDataSet.Name+'.'''''+ Copy(ChkLstSumFlds.Items[i],(Pos('-',ChkLstSumFlds.Items[i])+3),(length(ChkLstSumFlds.Items[i])-Pos('-',ChkLstSumFlds.Items[i])-3))+'''''])] ';
      end;
      delete(FieldString,length(FieldString),1);  with frPrntTbl do
      begin
        //Summary.Text:=FieldString;
    人  Summary.Text:='[sum([cdsview.''''入库金额''''])];//这样不行呀那该怎么解决?
        PageMargins.Left:=15;
        PageMargins.Right:=10;
        Title.Text := EdtZbt.Text + #13#10#13#10;
        PageHeader.Text := '日期:[date]    ' + EdtFbt.Text;
        PageFooter.Text := ' 第[page#]页(共[totalpages + 1]页)';
        BuildReport;
        ShowReport;
      end;
    end;
      

  3.   

    老大们去我的http://expert.csdn.net/Expert/topic/2901/2901801.xml?temp=.7944605看看吧!虽然分少!呜!