Delphi XE2是一個非常強大的開發工具，可以幫助開發人員快速構建高性能的應用程序。其中，JSON處理是其一個重要的功能。

var
jsonObj: TJSONObject;
begin
jsonObj := TJSONObject.Create;
try
jsonObj.AddPair('name', 'John');
jsonObj.AddPair('age', TJSONNumber.Create(30));
jsonObj.AddPair('isMarried', TJSONBool.Create(True));
WriteLn(jsonObj.ToString);
finally
jsonObj.Free;
end;
end;

以上代碼示例演示了如何在Delphi XE2中使用JSON。

TJSONObject是Delphi XE2中的一個重要類，用于表示JSON對象。通過AddPair方法，可以向jsonObj對象中添加一個名值對，這里添加了三個名值對：name，age和isMarried。其中，age的值表示數字類型，isMarried的值表示布爾類型。

最后，使用ToString方法將jsonObj對象轉換為字符串，以在控制臺中輸出json格式的內容。

除了使用TJSONObject，Delphi XE2還提供了許多其他的JSON類，如TJSONArray、TJSONString、TJSONNumber、TJSONBool等。

因此，Delphi XE2的JSON處理功能不僅功能強大，而且易于使用，幫助開發人員更輕松地處理JSON數據。