help me please!!!(11分)

BDE+ORACLE+delphi5
我一次写入一个月的记录，但有一个字段所有该月的记录都相同，所以我想用个edit，让
录入者只输入一次，然后同一提交！
Qry.CachedUpdates:=true;
Qry.RequestLive:=True;
Qry.UpdateObject:=UpdateSql1;
我QryUpdateRecord事件里这样写了一句
procedure frmMain.QryUpdateRecord(DataSet: TDataSet;
UpdateKind: TUpdateKind; var UpdateAction: TUpdateAction);
begin
inherited;
Qry.fieldbyname('MonthAction').asstring:=edtMonthAction.text;
end;
为什么老是报错说Qry is readonly?
怎么解决？

我跟踪进去时，Qry.CanModify为true;

接受答案了.