標籤:style blog http ar io color 使用 sp for
我們接下來將要使用FDDemo.sdb資料庫進行訪問,開始我們的第一個SQLite訪問例子。
我們的FDDemo.sdb存放目錄在:C:\Program Files (x86)\Embarcadero\Studio\14.0\Samples\Data
建立VCL Forms Application
在XE6 IDE中按 Ctrl + . 鍵,快速輸入 VCL Forms Application,斷行符號後建立了一個VCL Forms Application應用程式。
添加FireDAC相關組件
繼續按Ctrl + . 鍵,快速輸入下面的字元,建立如下組件:
FDPhysSQLiteDriverLink //SQLite驅動自動連接組件,等同於 uses FireDAC.Phys.SQLite;FDGUIxWaitCursor //用於自動管理GUI程式的等待游標,等同於 uses FireDAC.VCLUI.Wait;FDConnection //資料連線FDQuery //資料查詢DataSource //資料來源DBGrid //資料表格顯示
添加後,IDE中如效果:
接下來我們輸入簡單的代碼,如下:
procedure TForm1.FormCreate(Sender: TObject);var DBStr: string;begin //設定FDDemo.sdb的路徑 DBStr := ‘C:\Program Files (x86)\Embarcadero\Studio\14.0\Samples\Data\FDDemo.sdb‘; FDConnection1.DriverName := ‘SQLite‘; FDConnection1.Params.Add(‘Database=‘ + DBStr); FDQuery1.Connection := FDConnection1; DataSource1.DataSet := FDQuery1; DBGrid1.DataSource := DataSource1; FDQuery1.SQL.Text := ‘SELECT * FROM Products‘; FDQuery1.Open(); FDConnection1.Open(); DBGrid1.Align := alClient;end;
OK,至此,我們已經完成了一個SQLite的小例子了,按F9開始運行吧,運行效果如下:
通過看萬一老師的代碼,發現FDConnection可以使用ConnectionString設定串連內容。
//FDConnection1.DriverName := ‘SQLite‘; //FDConnection1.Params.Add(‘Database=‘ + DBStr); 等同於下面一行代碼 FDConnection1.ConnectionString := ‘DriverID=SQLite; Database=‘ + DBStr;
當然FDConnection.Open方法和FDQuery.Open方法支援如下使用:
FDConnection1.Open(‘DriverID=SQLite; Database=‘ + DBStr); FDQuery1.Open(‘SELECT * FROM Products‘);
Open方法中直接賦予ConnectionString和SQL語句。
FireDAC中的SQLite(二)