Delphi APP 開發入門(八)SQLite資料庫

Delphi APP 開發入門(八)SQLite資料庫

Delphi APP 開發入門(七)通知與雲端推播 << 前情

在撰寫APP程式時,如果遇到資料間無關聯性且資料量不多時,會以像xml檔案去儲存,但一旦遇到關聯性較複雜且資料比較大量時,就需要用資料庫來做記錄。今天的Delphi APP開發就來教大家如何撰寫資料庫APP,在這邊我們使用的是超輕量版的檔案型資料庫系統-SQLite。

在正式撰寫程式時,我們需要先建立一個新的SQLite資料庫,首先我們必需先到SQLite的官方網站下載二個檔案。

SQLite-DLL – Delphi XE6在開發工具連結資料庫時,需要此檔案,必需下載後解壓縮到 system32資料夾中。

SQLite-Shell – SQLite命令列工具,下載後在C槽建立一個SQLite資料夾解壓縮到這裡。

一、建立SQLite資料庫

開始 => 執行 輸入 cmd.exe 進入 命令列模式

依序輸入

sqlite3             註:進入sqlite3 命令列模式
.save todolist.db   註:儲存一個叫todolist.db的資料庫
.quit               註:離開sqlite3 命令列模式

技术分享

二、建立好資料庫之後,可以回到Delphi XE6新增一個新的Mobile Application程式,接下來我們點選右手邊的Data Explorer,可以看到二種連結方式(FireDAC以及DBExpress),我們先選擇dbExpress。技术分享

三、選擇SQLite按右鍵,Add New Connection

技术分享

四、連線名稱取名todolist

技术分享

五、Database輸入todolist.db的完整路徑 c:\sqlite\todolist.db技术分享

六、按下Advanced,把FailifMissing設為False,這個屬性設為True是指如果資料庫不存在時出現錯誤訊息,設為False時為不存在時建立一個。完成後按OK退出,最後按Test Connection做連線確認完成。

技术分享

技术分享

七、建立完資料庫連線後,接著建立資料表,點選剛才新增的todolist的Tables按右鍵New Table

技术分享

八、新增一個欄位為ToDoItem,資料型態(Data Type)為Text技术分享

九、建立完後按Save Table,儲存為Todo資料表

技术分享

技术分享

十、資料庫都連線完畢後,我們開始建立如下的畫面,先在畫面上放置一個置頂的ToolBar,裡面放一個置中的Label以及左右二邊的按鈕(一個新增、刪除),最後放上ListBox顯示資料
技术分享
十一、接著我們要將資料與程式做連結,方式很簡單,把剛才建立的todo table按左鍵拖拉到畫面上後,可以看到畫面上自動產生todolistconnection以及todotable二個DBX元件。
技术分享
十二、接著我們要將todolistconnection的connected設為True、todotable的active設為True。確定資料庫的連線是開啟的

技术分享

技术分享

十三、接著我們從畫面主選單的View選擇LiveBindings Designer。
技术分享
十四、LiveBindings Designer是Embarcadero很棒的資料連結技術,利用視覺化的方式讓資料與元件屬性連結。在這裡我們要把todotable裡的todoitem顯示在listbox怎麼做?很簡單就是把todotable裡的todoitem拖拉到listbox1的item.text屬性就行了。連結完成後會發現多了一條箭頭,表示todoitem要顯示在listbox的item.text中。
技术分享
技术分享
十五、接著我們要實現新增的功能,先在畫面上放置一個TSQLQuery,Name設為todoaddquery,SQLConnection設為todolistconnection,接著設定sql指令如下

Insert Into Todo(ToDoItem) Values(:ToDoItem)

技术分享
十六、設定好後,點選Params的屬性內會出現 ToDoItem的參數,我們將DataType設定為ftString(文字)
技术分享

十七、接著在畫面上的新增按鈕增加以下的程式碼

技术分享

十八、接著我們要實踐刪除的功能,重覆十五、十六二個步驟。把新增的Query名字取名為TodoDelQuery,SQL改為

Delete From Todo where ToDoItem = :ToDoItem

技术分享
十九、在畫面上的刪除按鈕增加以下程式碼
技术分享
二十、接著我們要在Listbox點入的時候,如果是有資料的話顯示刪除按鈕,沒有資料的話隱藏刪除按鈕,在ListboxItemClick寫入以下程式
技术分享

二十一、接著我們要在部署的程式中新增SQLite資料,進入主選單的Project => Deployment,點選Add Files,選取C:\SQLite下的todolist.db,platform先設定為Android,然後 Remote Path設為 assets\Internal\

技术分享
技术分享

二十二、最後,我們要做一個確保能建立資料庫的動作。先在程式碼的uses 加上 System.IOUtils

接著在TodolistConnectionBeforeConnect加上 技术分享

以及TodolistConnectionAfterConnect加上

技术分享

執行畫面

技术分享

技术分享

技术分享

郑重声明:本站内容如果来自互联网及其他传播媒体,其版权均属原媒体及文章作者所有。转载目的在于传递更多信息及用于网络分享,并不代表本站赞同其观点和对其真实性负责,也不构成任何其他建议。