FireDAC 和 Sqlite 六：加密

Firedac是Delphi开发跨平台的数据库应用程序的通用数据访问组件，同样适用于C++ Builder和FreePascal。这里是Firedac操作Sqlite的学习笔记。文中代码在Delphi 11中编译通过。

先将“FireDAC 和 Sqlite 一 ：基本控件和设置”一篇中提到的常用控件加入Form，并做好关联。

Firedac支持数据库加密方式有：aes-128,aes-192,aes-256, aes-ctr-128,aes-ctr-192,aes-ctr-256, aes-ecb-128,aes-ecb-192,aes-ecb-256

一. 创建和打开有密码的数据库

procedure TForm1.Button1Click(Sender: TObject);
begin
  FDConnection1.Params.Add('DriverID=SQLite');
  FDConnection1.Params.Add('Database=D:\SQLite\FireDAC.db');
  FDConnection1.Params.Add('Password=mima'); //与 Password=aes-256:mima;相同
  FDConnection1.Connected := True;
  FDQuery1.Open('SELECT * FROM MyTable');
end;

二. 修改密码

procedure TForm1.Button1Click(Sender: TObject);
begin
  FDConnection1.Params.Add('DriverID=SQLite');
  FDConnection1.Params.Add('Database=D:\SQLite\FireDAC.db');
  FDConnection1.Params.Add('Password=mima');
  FDConnection1.Params.Add('NewPassword='); //新密码, 这里留空表示取消密码
  FDConnection1.Connected := True;
  FDConnection1.Connected := False;
end;