最简单的输入数据后dbgrid列值自动变化，报错？

Question

提示project project1.exe raised exception class databaserror with message 'table1:
dataset not in edit or insert mode ' process stopped use stop or run to contine
只写了如下
procedure TForm1.DBGrid1ColExit(Sender: TObject);
begin
DBgrid1.Fields[2].value:=DBgrid1.Fields[0].value+DBgrid1.Fields[1].value
end;
但数据还是变化了得到了总值

Answer 1

如果用的是table，则在post之前应调用Edit

Answer 2

procedure TForm1.DBGrid1ColExit(Sender: TObject);
begin
table1.edit;
DBgrid1.Fields[2].value:=DBgrid1.Fields[0].value+DBgrid1.Fields[1].value
end;

Answer 3

//这样子比较安全
procedure TForm1.DBGrid1ColExit(Sender: TObject);
begin
table1.edit;
table1.Fields[2].value:=table1.Fields[0].value+table1.Fields[1].value；
table1.post;
end;