TSqliteDatabase connection configuration

BIZ TMS Aurelius
1

How can I configure the way the SQLite driver is configuer when using TSQLiteNativeConnectionAdapter ?


I need to Set it up in the same way I'd configure this FireDAC connection:

    Conn.Params.Add('DriverID=SQLite');
    Conn.Params.Add('SharedCache=False');
    Conn.Params.Add('LockingMode=Normal');
    Conn.Params.Add('Synchronous=Normal');
    Conn.UpdateOptions.LockWait := True;

2

SharedCache false and LockingMode normal are the default values for SQLite and thus for TMS Aurelius native adapter. But all of them can be configured directly according to SQLite documentation. For LockingMode and Synchronous, for example, you can simply execute pragma statements directly: 



var
  Statement: IDBStatement;
begin
  Statement := Connection.CreateStatement;
  Statement.SetSQLCommand('pragma synchronous = normal');
  Statement.Execute;
  Statement := Connection.CreateStatement;
  Statement.SetSQLCommand('pragma locking_mode = normal');
  Statement.Execute;
end;
3

Thank you very much. That answers my question.