縹緲's blog

要展示從資料庫抓取資料顯示到 app 上，首先當然是要建立一個簡單的資料庫，就拿「臺北市旅服中心服務據點資訊」當成這次的展示標的好了

資料來源你可以從台北市政府資料開放平台中取得，網址如下

http://data.taipei.gov.tw/opendata/apply/NewDataContent?oid=8AC76ABB-A384-4968-AD3C-9E8E9D238168

細節就不多說了，取得資料後你可以想辦法匯入到 Database 中，以 SQL Server 為例，Table Name 取名為 NavigationCenter，只從開放平台

的資料中擷取四個欄位，分別是編號、名稱、地址、電話與服務時間，Table Schema 如下

資料內容如下

資料庫準備好了，那麼就開始處理 DataSnap Server 的部分，

(1)首先在開啟 delphi 之後，點選 File-> New -> Other

(2)在 New Items 的畫面點選 DataSnap Server 然後點 OK

(3)為求展示方便，選擇 VCL Forms Application，然後點 Next

(4)按照預設值不改變，點選 Next

(5)預設 DataSnap Server 使用的 Port 是 211，你也可以自行更改，順便按一下 Test Port 確認該 Port 沒有被其他程式佔用，然後點選 Next

(6)Server methods ancestor class 的部分請選擇 TDServerModule，然後點選 Finish

(7)把專案儲存一下，取名為 TaipeiNavigationServer

(8)開啟 Form1，擺放一個 TPanel 與 TButton 並調整如下圖

(9)開啟 ServerMethodsUnit1，準備置放連結 SQL Server 資料庫用的元件，由於 EMBT 目前主推跨平台的 FireDAC，所以就用 FireDAC 來連接 SQL Server

    a.首先置放 TFDConnection，滑鼠左鍵點兩下 FDConnection1 後，會開啟如下對話框，這時需將 SQL Server 相關的資料鍵入，Driver ID 的部分選擇 MSSQL，然後輸入 Database、User_Name、Password、Server 等參數資料，

       如果輸入都正確的話，點選上方「Test」，應該會得到連線成功的畫面，如下圖

    b.接下來請將 FDConnection1.LoginPrompt 設定成 False

(10)繼續在 ServerMethodsUnit1 置放 TFDPhysMSSQLDriverLink 與 TFDGUIxWaitCursor 各一，如下圖

(11)然後置放一個 TFDQuery 元件，SQL 欄位則鍵入以下語法

(12)置放一個 TDataSetProvider 元件，其中 Dataset 屬性設定為 FDQuery1

(13)存檔...編譯...執行，可以得到如下的結果(如果出現Windows防火牆警訊，請選擇允許存取)....恭喜 Server 端大功告成

to be continued...