有用过DbgridEH请进,一个小问题......

Question

name  number
 A     12
 B     13
 C     15
------------
合计   40我想在GRID的最后一行,实行如上功能,该怎么做????

Answer 1

设置dbgrideh1.footerrowcount:=1;
设置dbgrideh1.sumlist.active:=true;
然后对每一列的footer属性进行设置，包括footer的类型像你这样的，第一列的footer属性为静态文本,值为“合计”第二列footer属性为fvtSum,并且连接数据字段即可

Answer 2

搂主你太懒了，首先dbgrideh里面的help写得明白了，楼上的又告诉你了，你还要什么代码？学学自己解决问题对你来说更重要。

Answer 3

代码来了，懒鬼，俺不要分，给别人吧！
var k:integer;
With DBGridEh1 do
begin
SumList.Active:=True;
for k := 0 to Columns.Count - 1 do
  begin
  if Columns[k].FieldName:='name' then
   begin
    Columns[k].Footer.ValueType:=fvtStaticText;
    Columns[k].Footer.Value:='合计';
   end;
  if Columns[k].FieldName:= 'number' then
    Columns[k].Footer.ValueType := fvtSum;
  end;
end;

Answer 4

俺是有点那个....不过我也有一段代码:
procedure TForm1.Table1AfterOpen(DataSet: TDataSet);
var
i:integer;
begin
with dbgrideh1 do
  begin
      for i :=0 to columns.Count -1 do
      begin
          if columns[i].Field.DataType = ftCurrency  then
          begin
          columns[i].Footer.FieldName :=columns[i].FieldName;
          columns[i].Footer.ValueType :=fvtsum;
          end;
       end;
  sumlist.Active :=true;
  end;end;执行以后,值为0!

Answer 5

SumList.Active:=True;
这个一定得设

Answer 6

TO :mrfanghansheng(***Rocket***) sumlist.activE不是问题的所在！