現在各種系統中JSON 用的越來越多。delphi 也自身支援JSON 處理。
今天簡要說一下kbmmw 内部如何使用和操作JSON。
kbmmw 中json的操作是以TkbmMWJSONStreamer 為基礎,要導入、導出JSON字元串, 首先要建立TkbmMWJSONStreamer.
然後是 TkbmMWJSONObject和 TkbmMWJSONArray。
先舉一個最簡單的例子。
以上代碼運作結果為
繼續修改添加一些代碼
這樣傳回的結果如下
即傳回一條記錄資訊。
如果需要傳回多條記錄,就需要使用TkbmMWJSONArray。
最後輸出結果為
下面講一下如何通路JSON字元串裡面的對象和值
運作截圖

通路對象
運作結果
通路數組
延伸一下
總之,用kbmmw 操作JSON 非常友善,更牛的是,這個可以與XML,BSON,YAML 實作無縫互轉。