XE7: TFDSQLiteSecurity wieder nicht für Android und iOS

[Darlo]

Ja, dass das leider nicht mal ebenso geht habe ich leider auch bemerkt. Wie es scheint, kann man ja bei den Dacs von DevArt eine eigene ClientLibrary mitgeben. Wenn diese dann Verschlüsselung unterstützt sollte es ja klappen.
Die Frage ist nur welche zu empfehlen ist. SQLCipher sieht passend aus, nur wenn man das für Win, OS X, iOS und Android braucht wird es teuer.

[Sir Rufo]

Das gibt es auch als OpenSource
https://www.zetetic.net/sqlcipher/open-source
hat aber durchaus Unterschiede zur Kaufversion

[Darlo]

Generell ist mir nur unklar:

a) Wie funktioniert die Einbindung konkret?
b) Können dann verschlüsselte DB's zwischen Win, OS X, iOS, Android ausgetauscht werden und sind kompatibel?

Ich blick da nicht wirklich durch.

[Mavarik]

Zitat:

Zitat von Darlo (Beitrag 1270847)

Meldung unter iOS:
[FireDac][Phys][SQLite][sqlite3]-303.
Funktionalität wird nicht unterstützt.

Kann ich nicht bestätigen, da ich diese Funktionalität auf Windows / iOS & Android nutze!

Mavarik

[Darlo]

Zitat:

Zitat von Mavarik (Beitrag 1270865)

Zitat:

Zitat von Darlo (Beitrag 1270847)

Meldung unter iOS:
[FireDac][Phys][SQLite][sqlite3]-303.
Funktionalität wird nicht unterstützt.

Kann ich nicht bestätigen, da ich diese Funktionalität auf Windows / iOS & Android nutze!

Mavarik

Auch mit XE7? Hast du mal geprüft ob die Datenbank unter iOS wirklich verschlüsselt ist. Wenn Du die DB mal im Editor öffnest sollte alles unverschlüsselt sein.
Neu unter XE7 (oder schon XE6??) ist, dass jetzt eine Fehlermeldung kommt.

[Mavarik]

Zitat:

Zitat von Darlo (Beitrag 1270867)

Auch mit XE7? Hast du mal geprüft ob die Datenbank unter iOS wirklich verschlüsselt ist. Wenn Du die DB mal im Editor öffnest sollte alles unverschlüsselt sein.
Neu unter XE7 (oder schon XE6??) ist, dass jetzt eine Fehlermeldung kommt.

LOL... Siehe anderen Thread :lol:

Mit XE6 funktioniert das problemlos... Mit XE7 kann ich meine App noch nicht übersetzen, dafür muss ich erst einiges $IFDEFen was sich in XE7 geändert hat.

Mavarik

[Darlo]

?
Verrätst Du mir auch wie Du es gemacht hast? FSqlConnection, welcher Type ist das?

[Mavarik]

Zitat:

Zitat von Darlo (Beitrag 1270871)

Verrätst Du mir auch wie Du es gemacht hast? FSqlConnection, welcher Type ist das?

Klar

Delphi-Quellcode:

...
SQLConnection : TFDConnection;
...

procedure TSQLite.SQLConnectionBeforeConnect(Sender: TObject);
begin
  SQLConnection.Params.Values['DriverName'] := 'SQLite';
  SQLConnection.Params.Values['DriverUnit'] := 'Data.DbxSqlite'; 
  SQLConnection.Params.Values['DriverPackageLoader'] := 'TDBXSqliteDriverLoader,DBXSqliteDriver190.bpl';
  SQLConnection.Params.Values['MetaDataPackageLoader'] := 'TDBXSqliteMetaDataCommandFactory,DBXSqliteDriver190.bpl';

  FSQLConnection.Params.Values['Database'] := GetbaseFileName; 
  FSQLConnection.Params.Values['ColumnMetadataSupported'] := 'False';
  FSQLConnection.Params.Values['FailIfMissing'] := 'False';

  if Trim(FPassword) <> '' then
    FSQLConnection.Params.Values['Password'] := FPassword;
end;

Mavarik

[Darlo]

Hi Mavarik,

danke für den Code. Leider kommt weiterhin folgende Fehlermeldung:

Zitat:

[FireDac][Phys][SQLite][sqlite3]-303.
Funktionalität wird nicht unterstützt.

Ich habe ein neues Projekt erstellt und bin wie folgt vorgegangen:
1. TFDConnection auf das Form gelegt und Drivername auf SQLite gesetzt
2. TButton auf das Form gelegt
3. Beim OnClick des Buttons:

Delphi-Quellcode:

FdConnection1.Connected := true;

4. Im BeforeConnect der TFDConnection

Delphi-Quellcode:

  FdConnection1.Params.Values['DriverName'] := 'SQLite';
  FdConnection1.Params.Values['DriverUnit'] := 'Data.DbxSqlite';
  FdConnection1.Params.Values['DriverPackageLoader'] := 'TDBXSqliteDriverLoader,DBXSqliteDriver190.bpl';
  FdConnection1.Params.Values['MetaDataPackageLoader'] := 'TDBXSqliteMetaDataCommandFactory,DBXSqliteDriver190.bpl';

  FdConnection1.Params.Values['Database'] := GetHomePath + PathDelim +
      'Documents' + PathDelim + 'test.sqlite';;
  FdConnection1.Params.Values['ColumnMetadataSupported'] := 'False';
  FdConnection1.Params.Values['FailIfMissing'] := 'False';
  FdConnection1.Params.Values['Password'] := 'test';

Was mache ich falsch?

[Mavarik]

Es fehlt ein uses... Bin in Bonn du auch ?