FireDac 的数据库批量语句提交（高效）

FDQuery1.Execute(100, 0);   //从0开始，执行100个批量执行

ShowMessage(IntToStr(FDQuery1.RowsAffected));   //显示执行成功的条数

OnExecuteError 事件可处理执行错误

procedure TForm1.FDQuery1ExecuteError(ASender: TObject; ATimes,
  AOffset: Integer; AError: EFDDBEngineException; var AAction: TFDErrorAction);
begin
  if AError.Errors[0].Kind = ekUKViolated then
    AAction := eaSkip
  else
    AAction := eaFail;
end;

标签：