![]() | ![]() Products ![]() ![]() ![]() ![]() |
Home » Technical Support » DBISAM Technical Support » Product Manuals » DBISAM Version 4 Manual for RAD Studio XE (Delphi) » Using DBISAM » Cached Updates |
var TablesList: TStrings; begin TablesList:=TStringList.Create; try with MyTable do begin TablesList.Add(TableName); Database.StartTransaction(TablesList); try ApplyCachedUpdates; Database.Commit; except Database.Rollback; raise; end; finally TablesList.Free; end; end;
procedure TMyForm.MyTableCachedUpdateError(Sender: TObject; CurrentRecord: TDBISAMRecord; E: Exception; UpdateType: TUpdateType; var Action: TUpdateAction); begin Action:=uaFail; if (E is EDBISAMEngineError) then begin if (EDBISAMEngineError(E).ErrorCode=DBISAM_RECLOCKFAILED) then Action:=uaRetry; end; end;
This web page was last updated on Friday, January 31, 2025 at 08:42 AM | Privacy Policy![]() © 2025 Elevate Software, Inc. All Rights Reserved Questions or comments ? ![]() |