dbgrideh汇总的问题 ( 积分: 10 )

  • 主题发起人 主题发起人 fuxin198311
  • 开始时间 开始时间
F

fuxin198311

Unregistered / Unconfirmed
GUEST, unregistred user!
我进行对某一列汇总,实现我所想的效果 我的代码是这样
DBGridEh7.FooterRowCount := 1;
DBGridEh7.FooterColor :=clInfoBk;
DBGridEh7.SumList.Active := True;

DBGridEh7.Columns[0].Footer.ValueType := fvtStaticText;
DBGridEh7.Columns[0].Footer.Value := '总计:';
DBGridEh7.Columns[1].Footer.ValueType := fvtCount;
我想把总计这个两个字也放在DBGridEh7.Columns[1].汇总列 还要显示‘条’ 就像这样
在DBGridEh7.Columns[1]显示 总计:20条 ,还有当下面有一行汇总行 就对应了一条条垂直的灰线条与表对应的列连接 要怎么除掉呢
 
源码里面是这么写的
fvtCount:
if Footer.DisplayFormat <> '' then
Result := FormatFloat(Footer.DisplayFormat, SumList.SumCollection.GetSumByOpAndFName(goCount, '').SumValue)
else
Result := FloatToStr(SumList.SumCollection.GetSumByOpAndFName(goCount, '').SumValue);
所以你在外面就改DisplayFormat
DBGridEh7.Columns[1].Footer.DisplayFormat := '总计:0条';


灰线条去掉要在DrawFooterCell事件里
 
去灰线的 能不能给代码呢
 
dbgrideh7.FooterRowCount:=1;
dbgrideh7.FooterColor:=clInfoBk;
dbgrideh7.SumList.Active:=true;
dbgrideh7.Columns[1].Footer.displayformat:='总计:0条';
dbgrideh7.Columns[1].Footer.valuetype:=fvtcount;
在代码加dbgrideh7.Columns[1].Footer.displayformat:='总计:0条';实现不了 我试了在属性里直接写入就行 那为什么用代码就实现不了呢 还有你说的灰线用码 怎么实现呀
 
这个控件不用代码处理,可以直接通过设置实现你说的功能
 
改成:
dbgrideh7.Columns[1].Footer.displayformat:='总计:#0条'

就可以了
 
試了試挺好用
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部