用ADOQuery如何批量录入以提高insert的速度?怎么用UPDATEBATCH

2025-12-17 22:26:07
推荐回答(1个)
回答1:

procedure TForm1.FormShow(Sender: TObject);
begin
ADODataSet1.LockType:=ltBatchOptimistic;
end;

procedure TForm1.ButtonCommitClick(Sender: TObject);
begin
ADODataSet1.UpdateBatch;
end;

procedure TForm1.ButtonCancelClick(Sender: TObject);
begin
ADODataSet1.CancelUpdates;
end;