Delphi 创建新 SQLite 数据库的常用方法如下(以 FireDAC 组件为例)
uses FireDAC.Comp.Client, FireDAC.Stan.Def, FireDAC.Stan.Async, FireDAC.DApt; procedure CreateNewSQLiteDB(const FileName: string); var FDConnection: TFDConnection; begin FDConnection := TFDConnection.Create(nil); try FDConnection.DriverName := 'SQLite'; FDConnection.Params.Database := FileName; FDConnection.Params.Add('LockingMode=Normal'); FDConnection.LoginPrompt := False; FDConnection.Connected := True; // 若文件不存在会自动创建 FDConnection.Connected := False; finally FDConnection.Free; end; end; // 调用示例 CreateNewSQLiteDB('C:\test\mydb.sqlite');
要点说明:
只需设置 Database
参数为新文件路径,连接时会自动创建数据库文件。
需在 uses 中引用 FireDAC 相关单元。
若无 FireDAC,可用第三方如 SQLite3 或 ZeosLib,方法类似。
如需 SQL 创建表等操作,可在连接后执行 SQL 语句即可。
Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号
执行时间: 0.37296414375305 seconds