1、首先將sqlite3.dll復(fù)制到你的系統(tǒng)system32（Windows
XP）目錄下
2、其次，lazarus中需要安裝sqlite3dataset組件（安裝不多說了，安裝包在x:\lazarus\components\sqlite下）
3、編譯后打開Lazarus，在use下添加兩個引用：StdCtrls, db
4、可以嘗試將下面的代碼添加到你的事件中（代碼來源于網(wǎng)上，不自己寫了，很簡單）：
var
dsTest:TSqlite3Dataset;
begin
dsTest:=
TSqlite3Dataset.Create(nil);
with dsTest
do
Begin
FileName:='New.db';
TableName:='NewTable';
if
not FileExists(FileName) then
begin
with
FieldDefs do
begin
Clear;
Add('Integer',ftInteger,0,False);
Add('String',ftString,0,False);
Add('Bool',ftBoolean,0,False);
Add('Float',ftFloat,0,False);
Add('Word',ftWord,0,False);
Add('DateTime',ftDateTime,0,False);
Add('Date',ftDate,0,False);
Add('Time',ftTime,0,False);
end;
end;
CreateTable;
end;
好了，編譯運行一下后，可以在程序目錄下找New.db，數(shù)據(jù)庫創(chuàng)建成功
需要的組件,TSQLite3Connection,TSQLTransaction,TQuery
按照delphi
下一樣的操作，從面板里拖下以上幾個組件，然后將TSQLite3Connection的Database設(shè)置為SQLite的數(shù)據(jù)文件位置，如D:\ss.db,注意Connected屬性不能設(shè)置為True，否則就提示：不能載入SQLite3.dll
文件，將TSQLite3Connection的Transaction屬性，設(shè)置為TSQLTransaction組件名字（你剛才自己添加的TSQLTransaction組件名字），其他就和Delphi中使用一樣的，使用SQLite數(shù)據(jù)庫，必須設(shè)置Transaction對象，可能就這一點和Delphi
中使用不太一樣（不設(shè)置，運行時會觸發(fā)錯誤的，編譯可以通過），使用TSQLQuery組件和其他Query組件一樣的。補充一點，把SQLite3.dll文件放在你的工程文件目錄下。
|
