Delphi 是一種常用的編程語言，可以方便地處理各種數(shù)據(jù)格式，包括 JSON。在實(shí)際開發(fā)中，我們可能需要對(duì) JSON 進(jìn)行修改，下面介紹一下 Delphi 中如何修改 JSON 的方法。

首先，需要用 Delphi 中的 TJSON類來讀取 JSON。TJSON類可以解析 JSON 并將其轉(zhuǎn)換為 TJSONObject 或 TJSONArray。對(duì)于修改 JSON，我們需要通過 TJSONObject 或 TJSONArray 來訪問 JSON 的各個(gè)元素。

下面是示例代碼，演示如何修改 JSON 中的某個(gè)元素。

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;

上述代碼中，我們首先創(chuàng)建一個(gè) TJSONObject 對(duì)象，然后向里面添加了三個(gè)鍵值對(duì)。接著，我們通過 GetValue 方法獲取 age 鍵對(duì)應(yīng)的值，將其轉(zhuǎn)換為 TJSONObject，然后通過 SetValue 方法修改 age 的值為 31。最后，我們調(diào)用 ToString 方法將 JSON 轉(zhuǎn)換為字符串返回并顯示出來。

總的來說，通過 TJSON 類和 TJSONObject 或 TJSONArray 對(duì)象，我們可以方便地讀取和修改 JSON 數(shù)據(jù)，在實(shí)際開發(fā)中十分方便。