Delphi 的 SQLite 操作封装,写得挺清晰,接口调用也比较顺手,适合入门学习和小项目实战。你要是在做轻量级数据库开发,尤其是不想折腾服务器那种,SQLite 搭配 Delphi 还挺香的。

SQLite3_Open打开数据库,用SQLite3_Exec直接跑 SQL 语句,代码结构蛮直接。最妙的是这些函数都是通过external方式直接调用sqlite3.dll里的 API,省得你自己折腾底层。

你可以参考下面这段调用方式,打开数据库、执行语句一步到位:

var
  db: TSQLiteDB;
  errMsg: PAnsiChar;
begin
  if SQLite3_Open('test.db', db) = 0 then
    SQLite3_Exec(db, 'CREATE TABLE IF NOT EXISTS user (id INTEGER PRIMARY KEY, name TEXT);', nil, nil, errMsg);
  SQLite3_Close(db);
end;

需要注意的是:路径记得用PAnsiChar格式传,出错信息通过ErrMsg返回,调试的时候挺有用。

如果你想更进一步了解,可以看看这些相关的参考文章,像SQLite3 数据库操作示例这篇就写得蛮细,代码也不少,适合照着练手。

如果你平时用的是 Delphi,刚好又不想引入大数据库系统,这套封装可以说是比较轻巧又靠谱的选择。