DBGrid 的自动计算，强！！！

[lxj_com2006]

比如第4、5行4列的数据需要1、2、3列数据相加，
这样1、2、3种某列数据变动后，4列数据马上重新计算

这种情况怎么处理？

如果ADOConnection1，ADOTable1数据集，DBGrid1打开前，
双击ADOTable1，打开“字段编辑器”
new fields,field type选calculated


然后编辑事件
TForm1.ADOTable1CalcFields(TDataSet *DataSet)
begin
DataSet.FieldByName("field4").AsInteger:=
DataSet.FieldByName("field1").AsInteger+
DataSet.FieldByName("field2").AsInteger+
DataSet.FieldByName("field3").AsInteger;
end;
可以让AutoCalcFields=true

全部用代码如何实现？？？，并且将自动计算字段保存到数据库。

请教。