Delphi是一款非常受歡迎的開發工具，在開發過程中，常常需要涉及到JSON數據。本文將介紹如何使用Delphi寫JSON。

Delphi可以通過TJSONObject來創建JSON數據。以下是一個示例代碼：

var
jsonObj: TJSONObject;
jsonStr: string;
begin
jsonObj := TJSONObject.Create;
jsonObj.AddPair('name', 'Tom');
jsonObj.AddPair('age', 18);
jsonStr := jsonObj.ToJSON;
ShowMessage(jsonStr);
end;

以上代碼創建了一個JSON對象，該對象包含兩個屬性：name和age。其中，name屬性的值為字符串"Tom"，age屬性的值為數字18。最后將JSON對象轉換成字符串，然后通過ShowMessage函數彈出一個消息框，顯示JSON字符串。

在這個示例中，要特別注意的是AddPair方法。該方法用于向JSON對象中添加一個鍵值對。第一個參數為鍵名，第二個參數為鍵值。如果鍵值為字符串類型，則需要加單引號；如果為數字類型，則無需加單引號。

除了TJSONObject，Delphi還提供了其他一些JSON相關的類，如TJSONArray和TJSONPair。其中，TJSONArray用于創建JSON數組，TJSONPair用于創建一個鍵值對。具體使用方法可以參考Delphi文檔。

在實際開發中，需要根據業務需求來創建不同的JSON數據。在創建JSON數據時，還需要考慮JSON數據的格式規范，以確保JSON數據可以被其他程序解析。例如，屬性名必須使用雙引號；字符串中的特殊字符需要轉義等。

總之，Delphi寫JSON非常簡單，只需要用到幾個類和方法即可。在使用之前，建議先了解JSON的基本概念和規范，以便更好地進行開發。