设置DBGridEh1.FooterRowCount:=2DBGridEh1.Columns[N]->Footers[0]->(FieldName, Value Type=fvtAvg)
-----------------------------------字段名---------(列平均)-----
DBGridEh1.Columns[N]->Footers[1]->(FieldName, Value Type=fvtSum)
-----------------------------------字段名---------(列合计)-----
上面两句表示页脚的第N列对字段FieldName分别求平均值(第一行)
和合计值(第二行)。
解决方案 »
- findfirst函数中遇到的问题·能讲解一下吗,谢谢
- 资源管理器中文件拖到shelllistview的问题
- 求DOC转BFX的软件?
- 我用DELPHI7怎么能把以前用的QUICKREPORT做的打印表编辑修改啊
- 问个简单的问题
- DELPHI开发中能否将JPEG图片保存到ORACLE数据库内,如何保存?
- 在2000下编译的程序在98上运行时,窗口会变大,控件的大小也失真了,怎么办?
- 请教那有DELPHI6.0的补丁啊?
- 关于写注册机。
- 能做一个启动和结束程序的程序不?
- 小妹做了一个小型的管理系统,但不知道如何才能移植到别的机子上运行
- 请问有没有这样一个控件,输入数字,自动转换为货币格式,像EXCEL中的“设定格式”功能一样。
DBGrid1.FooterRowCount:=2;
DBGrid1.SumList.Active := True;
DBGrid1.Columns[0].Footers[0].FieldName:='语文';
DBGrid1.Columns[0].Footers[0].ValueType:=fvtsum;
DBGrid1.Columns[1].Footers[1].fieldname:='语文';
DBGrid1.Columns[1].Footers[1].ValueType:=fvtAvg;
运行时提示以下错误:
List index out bounds(0)
请再指点。
DBGrid1.SumList.Active := True;
dbgrid1.Columns[0].footers.add;//一定要加上这么一句
Grid1.Columns[0].Footers[0].FieldName:='语文';
DBGrid1.Columns[0].Footers[0].ValueType:=fvtsum;
dbgrid1.Columns[1].footers.add;//这个地方也一定要加上这么一句
DBGrid1.Columns[1].Footers[1].fieldname:='语文';
DBGrid1.Columns[1].Footers[1].ValueType:=fvtAvg;
try it and goodluck!