Question

DELPHI adoquery提交多条数据

如图所示。当填写好内容后，点击增加 ，则在dbgrid里面显示一条数据，增加几次 显示几条，最后点击保存dbgrid显示的数据插入数据数据库。但是目前增加至显示一条数据。求解答！
procedure TForm5.b3Click(Sender: TObject);//增加
begin
with a1 do
begin
close;
sql.Clear;
sql.Add('select *from area where area_no=''0''') ;
open;
Append ;
a1.FieldByName('area_no').AsString:=db1.Text;
a1.FieldByName('area_name').AsString:=db2.Text;
end;

end;

procedure TForm5.b4Click(Sender: TObject);//保存
begin
if (db1.Text<>'') and (db2.Text<>'' )then
begin
a1.Post;
end;

end;

Answer 1

ADOQuery与数据库是不断开连接的，所以你只需要将更改写到ADOQuery里面，然后POST就到了数据库了，但是之前最好根据情况判定下是否需要开启事务

追问

最好是有代码。这样我才能更直观的了解和调试