SQLite iOS encrypt password klappt nicht

[Darlo]

Erkenntnis vom 02.09.2013:

Frage von mir:

Zitat:

Am 30.08.2013 um 11:39 schrieb x


Hallo Herr Y,

vielen Dank für Ihre Antwort. Das SQLiteSecurity Ding funktioniert unter Windows problemlos. Nur unter iOS wird es nicht ausgeführt….

Über eine Rückmeldung ob ich mich nur anstelle, oder diese Funktion unter iOS nicht funktioniert wäre ich Ihnen sehr dankbar.

Delphi-Quellcode:

procedure TForm1.ADConnection1AfterConnect(Sender: TObject);
begin
  adQuery1.SQL.Text := 'CREATE TABLE IF NOT EXISTS whatEver( '+
    'dsid                  varchar(50) NOT NULL,'+
    'pid                   varchar(50) NOT NULL,'+
    'kurzfristig           varchar(128),'+
    'mittelfristig         varchar(128),'+
    'langfristig           varchar(128),'+
    'datumLetzte           date,'+
    'inhaltLetzte          text,'+
    'vonWemLetzteg         varchar(50),'+
    'personen_nr           integer,'+
    'PRIMARY KEY (dsid, pid))';
  adQuery1.ExecSQL;
end;
 
procedure TForm1.Button1Click(Sender: TObject);
begin
  adConnection1.Connected := true;
end;
 
procedure TForm1.Button2Click(Sender: TObject);
begin
  showmessage(ADSQLiteSecurity1.CheckEncryption);
end;
 
procedure TForm1.Button3Click(Sender: TObject);
begin
  ADSQLiteSecurity1.SetPassword();
end;
 
procedure TForm1.Button4Click(Sender: TObject);
begin
  adConnection1.Connected := false;
 
end;
 
procedure TForm1.FormCreate(Sender: TObject);
begin
  {$IFDEF iOS}
  adConnection1.Params.Values['Database']  := GetHomePath + PathDelim +
      'Documents' + PathDelim + 'db1.sqlite';
  {$else}
    adConnection1.Params.Values['Database']  := ExtractFileDir(ParamStr(0))+'db1.sqlite';
  {$ENDIF}
 
  ADSQLiteSecurity1.DriverLink := ADPhysSQLiteDriverLink1;
  ADSQLiteSecurity1.Database := adConnection1.Params.Values['Database'];
  ADSQLiteSecurity1.Password := 'TEST_12345';
end;

Antwort von Emba:

Zitat:

Hallo Herr x,

in der Tat, wie befürchtet:

SQLite Verschlüsselung nur auf iOS. //Kommentar: Das nur auf iOS bezieht sich wohl darauf, dass es nur unter iOS nicht geht

Also müssten Sie sich nach Alternativen umschauen…. UniDAC, LiteDAC

Best regards,
Mit freundlichen Grüßen

y


Embarcadero Germany GmbH | www.embarcadero.com/de