关于TDBGridEh控件中的合计列的问题

Question

我在Table1的OnOpen事件中这样写了：
  with DBGridEh1 do
  begin
    SumList.Active := True;
    for i:=0 to Columns.Count-1 do
    begin
      if Columns[i].Field.DataType=ftInteger then
      begin
        Columns[i].Footer.FieldName := Columns[i].FieldName;
        Columns[i].Footer.ValueType := fvtSum;
      end;
    end;
  end;
但出来的合计数据全部为零，而你再在表格中修改数据时它的合计值为新值减旧值，
也就是说，合计是可以的，但只有当一开始OPEN时表格为空出来的合计值才是正确的，
为什么啊？？？？？？？？？？？？？？
我用的是BDE的TTable

Answer 1

不好意思上面写错了，
是OnAfterOpen事件。

Answer 2

哎~~~~~~~~~~~~~~
就算是花50分为EHLib控件包抓虫吧，
原来我在TDBGridEH控件如果在设计期不连数据的话不能设置SumList.Active := True;
否则它对数据集原有的数据不作统计！我自己解决了大家一拿分吧！

Answer 3

呵呵，4天了，这分我来笑纳吧。：）
我用过DBGRIDEH的合计列是没什么问题的。