tadoquery + dbgrid按条件输出

tadoquery + dbgrid表: 成绩  等级
在dbgrid中在成绩单元格输入成绩后,等级单元格自动填上对应等级
  如
     成绩    等级
    99      A
    89     B是在那个控件的那个事件里面写啊!我写了一个!
procedure TForm1.adoquery1afterpost(DataSet: TDataSet);
begin
if form1.DBGrid1 .Fields[5].Value =10 then
     adoquery1.edit;
    form1.DBGrid1 .Fields[6].Value :=232;
  adoquery1.UpdateBatch();
end;
提示:adoquery1: dataset not in edit or insert mode 这是什么原因啊!!