Delphi 是一種常用的編程語言,可以方便地處理各種數據格式,包括 JSON。在實際開發中,我們可能需要對 JSON 進行修改,下面介紹一下 Delphi 中如何修改 JSON 的方法。
首先,需要用 Delphi 中的 TJSON類來讀取 JSON。TJSON類可以解析 JSON 并將其轉換為 TJSONObject 或 TJSONArray。對于修改 JSON,我們需要通過 TJSONObject 或 TJSONArray 來訪問 JSON 的各個元素。
下面是示例代碼,演示如何修改 JSON 中的某個元素。
var JSON, Obj: TJSONObject; begin JSON := TJSONObject.Create; try JSON.AddPair('name', 'John'); JSON.AddPair('age', '30'); JSON.AddPair('title', 'Developer'); Obj := JSON.GetValue('age') as TJSONObject; Obj.SetValue('age', 31); ShowMessage(JSON.ToString); finally JSON.Free; end; end;
上述代碼中,我們首先創建一個 TJSONObject 對象,然后向里面添加了三個鍵值對。接著,我們通過 GetValue 方法獲取 age 鍵對應的值,將其轉換為 TJSONObject,然后通過 SetValue 方法修改 age 的值為 31。最后,我們調用 ToString 方法將 JSON 轉換為字符串返回并顯示出來。
總的來說,通過 TJSON 類和 TJSONObject 或 TJSONArray 對象,我們可以方便地讀取和修改 JSON 數據,在實際開發中十分方便。
下一篇vue.js序號