SQLite Database encryption error occurr

[ibdac1pro]

// error code
UniConnection1.Database := 'd:\sqlite.db';
UniConnection1.SpecificOptions.Values['ForceCreateDatabase'] := 'True';
UniConnection1.SpecificOptions.Values['Direct'] := 'True';
UniConnection1.SpecificOptions.Values['EncryptionAlgorithm'] := 'leBlowfish';
UniConnection1.SpecificOptions.Values['EncryptionKey'] := '1111';
UniConnection1.Open;

Error message is 'SQLite function is not linked'

// no error.
UniConnection1.Database := 'd:\sqlite.db';
UniConnection1.SpecificOptions.Values['ForceCreateDatabase'] := 'True';
// UniConnection1.SpecificOptions.Values['Direct'] := 'True';
// UniConnection1.SpecificOptions.Values['EncryptionAlgorithm'] := 'leBlowfish';
// UniConnection1.SpecificOptions.Values['EncryptionKey'] := '1111';
UniConnection1.Open;

What is the problem?

Win7 32 & Delphi 10.1 Berlin & Unidac 6.3.12 & SQLite 3.13.0

Thanks a lot.

[AlexP]

Hello,

We can't reproduce the issue on the latest version of UniDAC. Please send the full sample and the database file to support*devart*com.

P.S. The latest version of UniDAC uses SQLite 3.12.0 in Direct Mode

[ibdac1pro]

Hi,

It failed to solve yet.

Sent the test file.

Thank you.

[AlexP]

Hello,

We couldn't reproduce the problem on the latest version of UniDAC and Berlin, your sample works with no errors. Please clarify, what application are you developing: VCL or FMX? Also specify the Windows platform (x32/x64), Mac OS X, iOS or Android.

[ibdac1pro]

Hi,

I developed the win32 and android app to firemonkey(FMX) at the same time.
That source was not a problem at all in delphi seattle.
However, an error in delphi berlin.

Why I do not know what causes an error in delphi berlin.
In delphi seattle not a problem at all.

Help me.

Thanks a lot.

[MaximG]

We continue testing UniDAC functioning with encrypted data using RAD Studio 10.1 Berlin. We have composed and sent you a small test sample including an application (Win32) compiled in RAD Studio 10.1 Berlin and the source code of this application. Please check whether this application causes any errors? In addition, compile this project in your IDE and check if it works.

[ibdac1pro]

Hi,

I not yet received the mail.

My mail is [email protected]

Thanks a lot.

[ibdac1pro]

Hi,

What is the path of sqlite3.dll?

Thanks a lot.

[AlexP]

In Direct Mode

Code: Select all

  UniConnection1.SpecificOptions.Values['Direct'] := 'True';

UniDAC doesn't use the SQLite3.dll library. The obj file compiled from SQLite sources is used in this mode. It is included in our module. So there is no need to specify path to the sqlite3.dll library.

[ibdac1pro]

Hi,

I understand.

But compile error occurr.

// This is the code you sent to me.
procedure TForm1.btTouchMeClick(Sender: TObject);
begin
UniConnection1.ProviderName := 'SQLite';
UniConnection1.Database := etDatabase.Text;
UniConnection1.SpecificOptions.Values['ForceCreateDatabase'] := 'True';
UniConnection1.SpecificOptions.Values['Direct'] := 'True';
UniConnection1.SpecificOptions.Values['EncryptionAlgorithm'] := 'leBlowfish';
UniConnection1.SpecificOptions.Values['EncryptionKey'] := '1111';
UniConnection1.Connect;
UniConnection1.ExecSQL('CREATE TABLE IF NOT EXISTS TESTTABLE (ID INTEGER NOT NULL, NAME TEXT)');
UniConnection1.ExecSQL('DELETE FROM TESTTABLE');
UniConnection1.ExecSQL('INSERT INTO TESTTABLE VALUES (100, ''Value 1'')');
UniConnection1.Disconnect;
UniQuery.Close;

UniConnection1.Connect;
UniQuery.SQL.Text := 'Select * From TESTTABLE';
UniQuery.Open;
Memo.Lines.Clear;
Memo.Lines.Add(Format('ID = %s ; Name = %s', [UniQuery.FieldByName('ID').AsString, UniQuery.FieldByName('Name').AsString]));
end;

"SQLite function is not linked"


Delphi 10.1 Berlin, Win32, UniDac 6.3.12

Thanks a lot.

[AlexP]

In design time open the UniConnection dialog (double-click the component on the form);
select the SQLite provider;
on the Specific Options tab set the Direct option to True;
and try to establish connection by clicking the Connect button.
Let us know the result.

[ibdac1pro]

Hi,

I Reinstalled delphi.
OK. No problem.
Sorry.
Thanks a lot.

[AlexP]

Glad to see that the issue was resolved. If you have any further questions, feel free to contact us.