DBGridEh1.FooterRowCount:=1;
DBGridEh1.SumList.Active:=True;
DBGridEh1.FootColor:=clInfoBk;
DBGridEh1.Columns[0].Footer.ValueType := fvtStaticText;
DBGridEh1.Columns[0].Footer.Value := '总计:';
DBGridEh1.Columns[1].Footer.ValueType := fvtCount; //fvtSum
另:在DataSource的OnDataChange中,DBGridEh1.SumList.RecalcAll;
DBGridEh1.SumList.Active:=True;
DBGridEh1.FootColor:=clInfoBk;
DBGridEh1.Columns[0].Footer.ValueType := fvtStaticText;
DBGridEh1.Columns[0].Footer.Value := '总计:';
DBGridEh1.Columns[1].Footer.ValueType := fvtCount; //fvtSum
另:在DataSource的OnDataChange中,DBGridEh1.SumList.RecalcAll;
DBGRIDEH1.getfootervalue(0,DBGRIDEH1.columns[i])
表示取第一行,第i列的foot值。(foot可能有多行)
表示取第一行,第i列的foot值。(foot可能有多行)
标签: 杂谈 |
0、将dBGridEh.FooterRowCount := 1
1、将DBGridEh.SumList.Active := True;
2、将Columns[要求和的字段].Footer.ValueType := vtSum;
就行了
最后要注意,在FormCloseQuery事件中,
一定要将SumList.Active := False,因为在数据集中的数据多了以后,
FormClose会让DBGridEh释放所有EhLib资源,会使得退出很慢,
所以将SumList.Active := False不会引起退出很慢
1、将DBGridEh.SumList.Active := True;
2、将Columns[要求和的字段].Footer.ValueType := vtSum;
就行了
最后要注意,在FormCloseQuery事件中,
一定要将SumList.Active := False,因为在数据集中的数据多了以后,
FormClose会让DBGridEh释放所有EhLib资源,会使得退出很慢,
所以将SumList.Active := False不会引起退出很慢