Delphi 是一種廣泛使用的開發工具,其中處理 JSON 數據是相當普遍的需求。JSON 是一種輕量級的數據交換格式,廣泛應用于前后端數據傳輸。
在 Delphi 中,我們常常需要處理 JSON 數據的子節點。子節點通常是 JSON 對象中的一個鍵值對,其鍵為一個字符串,值則可以是字符串、數字、布爾值、數組或另一個 JSON 對象。
為了處理 JSON 子節點,我們通常需要使用 TJSONObject 類型。TJSONObject 可以通過 Add 方法添加子節點,通過 Find 方法查找子節點。我們可以通過以下代碼創建一個 JSON 對象,并向其添加一個名為 "name" 的字符串子節點:
var jsonObject: TJSONObject; begin jsonObject := TJSONObject.Create; jsonObject.Add('name', 'John'); end;
我們同樣可以使用一個名為 FromJSONString 的類方法將一個字符串轉換為 JSON 對象。這個方法返回一個 TJSONObject 類型的對象,我們可以通過處理其子節點獲取 JSON 數據的各個部分。例如:
var jsonString: string; jsonObject: TJSONObject; nameNode: TJSONData; begin jsonString := '{"name": "John", "age": 30, "isStudent": true}'; jsonObject := TJSONObject.ParseJSONValue(jsonString) as TJSONObject; nameNode := jsonObject.Find('name'); if Assigned(nameNode) then begin ShowMessage(nameNode.Value); end; end;
在這段代碼中,我們將一個包含了三個子節點的 JSON 字符串轉換為 JSON 對象,并從中查找名為 "name" 的子節點。我們通過 Value 屬性獲得了該子節點的值,并在應用程序中進行了顯示。
總的來說,Delphi 中處理 JSON 數據的方法并不難,只要掌握了 TJSONObject 類型的基本操作方法,就能夠輕松處理 JSON 子節點。