可以用lazarus方便地操作sqlite数据库。

sqlite3Connection1.Close;

sqlite3Connection1.CharSet := PChar('UTF8');

sqlite3Connection1.DatabaseName := 'D:\yyy.db';

sqlite3Connection1.UserName := trim(EditDbUser_sqlite.Text);

sqlite3Connection1.Password := trim(EditDbPwd_sqlite.Text);

try

//sqlite3Connection1.createDb; // 不用这个，会出错

sqlite3Connection1.Connected:=true;

showmessage('sqlite数据库 ' + EditDbName_sqlite.Text + ' 创建操作完成。');

except

on E: Exception do

begin

memo1.Lines.Add(sysToUtf8(E.Message));

memo1.Lines.Add('请检查sqlite数据库是否配置正确。');

showmessage(sysToUtf8(E.Message));

end;

end;