Как подключиться к БД SQLite с установленным паролём?

Устанавливаю на БД пароль = '1'. Без шифрования. В Windows все подключается нормально.
Но под Android приложение виснет на Splash заставке.
Устанавливаю пароль под Windows:
procedure TForm1.Button1Click(Sender: TObject);  
begin
  FDConnection1.Connected := False;
  FDSQLiteSecurity1.Database := pathEdit3.Text;
  FDSQLiteSecurity1.Password := '1';
  FDSQLiteSecurity1.SetPassword;
end;

Подключение:
procedure TForm1.FDConnection1BeforeConnect(Sender: TObject);
begin
   {$IF DEFINED(iOS) or DEFINED(ANDROID)}
  FDConnection1.Params.Values['Database'] :=
      TPath.Combine(TPath.GetDocumentsPath, 'main_v3.sdb');

   FDConnection1.Params.Values['DriverID'] :='SQLite';
   FDConnection1.Params.Values['Encrypt'] :='enNO';
   FDConnection1.Params.Values['Password'] :='1';
  {$ENDIF}
end;
  • Вопрос задан
  • 82 просмотра
Решения вопроса 1
@fromdns Автор вопроса
procedure TForm1.FDConnection1BeforeConnect(Sender: TObject);
begin
{$IF DEFINED(iOS) or DEFINED(ANDROID)}
FDConnection1.Params.Values['Database'] :=
TPath.Combine(TPath.GetDocumentsPath, 'main_v3.sdb');
FDConnection1.Params.Values['DriverID'] :='SQLite';
// FDConnection1.Params.Values['Password'] :='алгоритм-шифрования'+':' +'пароль';
FDConnection1.Params.Values['Password'] :='aes-128'+':' +'1';
{$ENDIF}
end;
Ответ написан
Комментировать
Пригласить эксперта
Ваш ответ на вопрос

Войдите, чтобы написать ответ

Войти через центр авторизации
Похожие вопросы