Advertisement
Guest User

Untitled

a guest
Mar 29th, 2017
53
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.32 KB | None | 0 0
  1. try
  2. FDConnection1.StartTransaction;
  3.  
  4. FDSchemaAdapter1.ApplyUpdates(0);
  5.  
  6. FDQuery1.CommitUpdates;
  7. FDQuery2.CommitUpdates;
  8.  
  9. FDConnection1.Commit;
  10. except on E: Exception do
  11. begin
  12. FDConnection1.Rollback;
  13. raise Exception.CreateFmt('Something went wrong. Error: %s', [E.Message]);
  14. end;
  15. end;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement