相關資料:
https://www.cnblogs.com/barryhong/p/3884977.html
准備工作:
1.用SQLiteExpertPers建立一個sqlite數據庫。
2.打開delphi xe7。
一、FireDAC法
設置庫聯接
1.放入FDConnection1控件
2.放入FDConnection1.DriverName := SQLite
3.點擊“FDConnection1.Params”
4.在“FDConnection1.Params”中寫入
DriverID=SQLite
Database=C:\Users\zhujianqiang\Desktop\sqlite\sqlite.db //你的sqlite數據庫路徑
5.點“確定”
6.設置FDConnection1.Connected為True。
設置表聯接
1.放入FDQuery1控件
2.設置FDQuery1.Connection為FDConnection1。
3.點擊設置FDQuery1.SQL。
4.在FDQuery1.SQL.Text中寫入select * from Tmanual。
5.設置FDQuery1.Active為True。
設置數據橋
1.放入DataSource1控件
2.設置DataSource1.DataSet為FDQuery1。
設置數據顯示
1.放入DBGrid1控件
2.設置DBGrid1.DataSource為DataSource1。
PS:在窗體或是數據模塊中必須放入FDPhysSQLiteDriverLink1、FDGUIxWaitCursor1這二個控件。有朋友說這是等於注冊DLL。
二、SQL控件法
設置庫聯接
1.放入SQLConnection1控件
2.設置SQLConnection1.ConnectionName*為SQLITECONNECTION。
3.設置SQLConnection1.Params中的Database
為C:\Users\zhujianqiang\Desktop\sqlite\sqlite.db //你的sqlite數據庫路徑
4.點“確定”
5.設置SQLConnection1.Connected為True。
設置表聯接
1.放入SQLQuery1控件
2.設置SQLQuery1.SQLConnection為SQLConnection1。
3.設置SQLQuery1.SQL。
4.在SQLQuery1.SQL.Text中寫入select * from Tmanual。
5.設置FDQuery1.Active為True。
設置數據轉換
1.放入DataSetProvider1。
2.設置DataSetProvider1.DataSet為SQLQuery1。
3.放入ClientDataSet1。
4.設置ClientDataSet1.ProviderName為DataSetProvider1。
設置數據橋
1.放入DataSource1控件
2.設置DataSource1.DataSet為ClientDataSet1。
設置數據顯示
1.放入DBGrid1控件
2.設置DBGrid1.DataSource為DataSource1。
PS:代碼聯接方式
procedure TForm1.Button1Click(Sender: TObject);
begin
FDConnection1.Connected := False;
FDConnection1.Params.Clear;
FDConnection1.Params.Add('Database='+ ExtractFilePath(Application.Exename) +'TianJin.db');
FDConnection1.Params.Add('DriverID=SQLite');
FDConnection1.Connected := True;
FDQuery1.Active := True;
end;