TFDConnection // 数据连接 TFDQuery // 数据查询 TDataSource // 数据源 TDBGrid // 数据显示 // uses FireDAC.Phys.SQLite 之后, 可不用添加 TFDPhysSQLiteDriverLink //访问SQLite 文件数据库
// uses FireDAC.Phys.MSAcc 之后, 可不用添加 FDPhysMSAccessDriverLink1 //访问Access MDB文件数据库
// uses FireDAC.VCLUI.Wait 之后, 可不用添加 TFDGUIxWaitCursor
procedure TForm1.FormCreate(Sender: TObject); begin FDQuery1.Connection := FDConnection1; FDConnection1.LoginPrompt:=false; //取消登录提示框 DataSource1.DataSet := FDQuery1; DBGrid1.DataSource := DataSource1; FDConnection1.Open('DriverID=SQLite;Database=test1.Sqlite3'); //E:\Delphi10.2\FireDAC学习\1111111\Win32\Debug //数据库文件test1.Sqlite3,一定要放在 exe所在目录 才可使用相对路径 FDQuery1.Open('SELECT * FROM aTable'); end;