TADoquery :lockey:ltBatchOptimistic
TAdoconnection的设置都没有什么问题。
我现在往一张表里面添加一批记录,按保存时,把所有新添加的记录事务提交,没有什么问题。
procedure TForm1.Button2Click(Sender: TObject);
begin
  try
    if not  dc.InTransaction then
     dc.BeginTrans;
     dq.UpdateBatch;
     dc.CommitTrans;  except
    dc.RollbackTrans;
  end;
end;但是如果我想取消刚才添加的那些记录,该如何操作(不会时一条一条删除吧)。
我的记录还在内存里,还没有dq.UpdateBatch;该如何来取消添加 刚才记录操作?
procedure TForm1.Button3Click(Sender: TObject);
begin  try
   if not  dc.InTransaction then
   dc.BeginTrans;
   dq.DeleteRecords;
   dc.CommitTrans;
 except
    dc.RollbackTrans;
  end;
end;