XE7: TFDSQLiteSecurity wieder nicht für Android und iOS

[Darlo]

Hi,

funktioniert bei mir leider nicht...

Delphi-Quellcode:

uses
  System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
  FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, Data.DBXSQLite,
  FireDAC.Stan.Intf, FireDAC.Stan.Option, FireDAC.Stan.Error, FireDAC.UI.Intf,
  FireDAC.Phys.Intf, FireDAC.Stan.Def, FireDAC.Stan.Pool, FireDAC.Stan.Async,
  FireDAC.Phys, FireDAC.Phys.SQLite, FireDAC.Phys.SQLiteDef,
  FireDAC.Stan.ExprFuncs, FireDAC.Stan.Param, FireDAC.DatS, FireDAC.DApt.Intf,
  FireDAC.DApt, FMX.StdCtrls, Data.DB, FireDAC.Comp.DataSet, FireDAC.Comp.Client,
  FireDAC.FMXUI.Wait, FireDAC.Comp.UI;


procedure TForm1.FDConnection1BeforeConnect(Sender: TObject);
begin
  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'] := FDbFile;
  FdConnection1.Params.Values['ColumnMetadataSupported'] := 'False';
  FdConnection1.Params.Values['FailIfMissing'] := 'False';
  FdConnection1.Params.Values['Password'] := 'AES-256:test';
end;

Fehler:
Funktionalität wird nicht unterstützt.