//DBE
  Query1.CachedUpdates := True; //驱动缓存更新机制
  Query1.ApplyUpdates; //提交//出现错误什么都不更改//多个表一起提交是使用Database1  //ADO
  ADOQuery1.LockType := ltBatchOptimistic; //驱动缓存更新机制
  ADOQuery1.UpdateBatch; //提交//出现错误什么都不更改//多个表一起提交是使用ADOConnection1