Question

关于DELPHI中的DBGRID的一些问题

1：
如何获得DBGRID的总行数，并把行数赋给EDIT的TEXT值
2：
如何获得DBGRID中某列的和，比如列CPD_Money，我要如何获得这列里面全部数值的总和，并赋给EDIT的TEXT值
3：
如果我数据库里，某列里的数据为1，我想让他在DBGRID中显示的是一般用户，如果是0的话，就显示超级用户，不更改数据库数据，实现这样的数据转换，可以实现吗，如果不行，哪个第三方控件可以实现。
最好是能写个完整的代码，上面的这些问题。

Answer 1

1: EDIT1.TEXT:=DBGrid1.DataSource.DataSet.RecordCount;

2:先声明一个全局的REAL类型的变量，假如叫tmp_total,在你的DBGRID的数据集控件的BeforeOpen事件中写入tmp_total:=0;如果你做过用FILTER来过滤结果集合的话，那在数据集控件的OnFilterRecord事件中也加入tmp_total:=0;如下面第三个问题那样在你需要累加的CPD_Money字段的OnGetText事件写入如下代码：
tmp_total:=tmp_total+sender.AsFloat;
EDIT2.TEXT:=floattostr(tmp_total);
这种做法就能自动求到你要的和，要不然你也可以用循环的方式求，稍微麻烦点点
3:不管你的DBGRID用的是是TABLE，QUERY，还是ADO的数据集控件，双击，然后右键添加所有字段，你可以把不需要显示的字段删除掉或者设置其VISIBLE属性为FALSE，选中你要转换显示的字段，也就是TYPE这个字段，在其OnGetText事件中写入下面的代码：
if sender.AsString='0' then

text:='超级用户'
else if sender.AsString='1' then

text:='一般用户'
else

text:=sender.AsString;