Wenn du das in Einzelschritten ausführen willst, kannst du es in etwa so machen:
Delphi-Quellcode:
try
Connect1.StartTransaction;
TFDQuery1.ApplyUpdates(-1);
TFDQuery1.CommitUpdates;
finally
if TFDQuery1.UpdatesPending then
begin
Connect1.Rollback;
Result := False;
end
else
begin
Connect1.Commit;
Result := True;
end;
end;