Delphi 有很多輕松的方法來序列化字符串到JavaScript Object Notation (JSON) 格式。在最新的Delphi版本中，JSON 系列化接口已經內置，封裝成了 System.JSON 單元。下面就提供一些Delphi序列化字符串到JSON格式的例子。

procedure Demo;
var
JsonObject: TJSONObject;
JsonArray: TJSONArray;
begin
//一般對象
JsonObject := TJSONObject.Create;
JsonObject.AddPair('name', 'Andy');
JsonObject.AddPair('age', 30);
Writeln(JsonObject.ToString);
//輸出結果：{"name":"Andy","age":30}
//嵌套對象
JsonObject := TJSONObject.Create;
JsonArray := TJSONArray.Create;
JsonArray.Add('book1');
JsonArray.Add('book2');
JsonObject.AddPair('books', JsonArray);
JsonArray := TJSONArray.Create;
JsonArray.Add('car1');
JsonArray.Add('car2');
JsonObject.AddPair('cars', JsonArray);
Writeln(JsonObject.ToString);
//輸出結果：{"books":["book1","book2"],"cars":["car1","car2"]}
//數組
JsonArray := TJSONArray.Create;
JsonArray.Add('book1');
JsonArray.Add('book2');
Writeln(JsonArray.ToString);
//輸出結果：["book1","book2"]
end;