中间层编程问题！！(10分)

我在中间层编写：
with adoquery1do
begin
close;
sql.Clear;
sql.Add('select * from hpzlb');
open;
first;
for i:=1 to recordcountdo
begin
adoquery1.Edit ;
fieldbyname('ck').AsString:='90';
post;
next;
end;
end;
这样数据库怎么不能更新阿？？帮帮忙！！！

中间层的事件呢？Provider--->BeforeUPdate事件

什么事件触发此编码？

干吗不SQL直接更新?[]

with adoquery1do
begin
close;
sql.Clear;
sql.Add('select * from hpzlb');
open;
first;
for i:=1 to recordcountdo
begin
adoquery1.Edit ;
fieldbyname('ck').AsString:='90';
post;
next;
end;
close;
//加入这行
sql.Clear;
//加入这行
sql.Add('select * from hpzlb');
//加入这行
open;
//加入这行
end;

把post改为UpdateBatch即可