Delphi 是一種用于創建高級 Windows 應用程序的面向對象編程語言。在開發過程中，處理 JSON 數據格式已成為一項必備技能。JSON 是一種輕量級數據交換格式，易于理解和處理。

var
MyJson: TJSONObject;
begin
MyJson := TJSONObject.Create;
try
MyJson.AddPair('Name', 'John');
MyJson.AddPair('Age', 30);
MyJson.AddPair('Married', True);
ShowMessage(MyJson.ToString);
finally
MyJson.Free;
end;

在 Delphi 中，可以使用 TJSONObject 和 TJSONValue 等類來創建、解析和序列化 JSON 數據。在上面的示例中，我們創建了一個名為 MyJson 的 TJSONObject 對象，并向其中添加了三個值。最后，我們使用 ToString 方法將其轉換為字符串并顯示出來。

var
MyJson: TJSONObject;
Value: TJSONValue;
Name: string;
Age: Integer;
Married: Boolean;
begin
MyJson := TJSONObject.ParseJSONValue('{ "Name": "John", "Age": 30, "Married": true }') as TJSONObject;
try
Name := MyJson.GetValue('Name');
Age := MyJson.GetValue('Age');
Married := MyJson.GetValue('Married');
ShowMessage(Format('%s is %d years old, Married: %s', [Name, Age, BoolToStr(Married, True)]));
finally
MyJson.Free;
end;

在 Delphi 中可以使用 ParseJSONValue 方法將字符串轉換為 TJSONValue 類型的對象。示例中使用 String 類型的字符串創建了一個 JSON 對象，并從中提取了三個值。GetValue 方法自動進行類型轉換，確保獲得正確的類型，并且在無法找到對應鍵時會返回默認值。

總之，處理 JSON 數據格式是 Delphi 語言編程實踐中的關鍵技能。通過使用 TJSONObject 和 TJSONValue 等類，開發人員可以輕松地創建、解析和序列化 JSON 數據，并與其他應用程序進行數據交換。