//我想对增加一批数据后再进行保存,这个方法怎么不行。
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
  ADOQUery1.close;
  ADOQUery1.SQL.Clear;
  ADOQUery1.SQL.Add('select * from gj');
  ADOQUery1.Open;
end;procedure TForm1.BitBtn2Click(Sender: TObject);
begin
  ADOQUery1.Edit;
  ADOQUery1.Last;
  ADOQUery1.Append;
end;procedure TForm1.BitBtn3Click(Sender: TObject);
begin
   ADOQUery1.edit;
   ADOQUery1.Post;
   DBGrid1.Refresh;
end;procedure TForm1.FormCreate(Sender: TObject);
begin
  ADOQUery1.LockType:=ltBatchOptimistic ;
end;end.