Delphi中可以通過JsonToObject函數將JSON數據轉換為對象。這個函數可以將符合JSON格式的字符串轉換為Delphi對象。

下面是一個示例，它使用了JSON字符串來創(chuàng)建一個對象：

var
obj: TJSONObject;
jsonObjectString: string;
customerName: string;
customerAge: integer;
begin
jsonObjectString := '{\"Name\":\"Tom\",\"Age\":34}';
obj := TJSONObject.ParseJSONValue(jsonObjectString) as TJSONObject;
customerName := obj.GetValue('Name').Value;
customerAge := StrToInt(obj.GetValue('Age').Value);
end;

代碼中，我們首先定義一個TJSONObject類，該類可以從JSON字符串中創(chuàng)建一個對象。我們還定義了一個jsonObjectString變量，其中包含JSON格式的字符串數據。在實例化TJSONObject后，我們使用GetValue函數來獲取指定鍵的值。在這個例子中，我們獲取了名為“Name”和“Age”的值，然后將它們轉換為字符串和整數。

由于JSON字符串可以包含復雜的數據結構，例如數組和嵌套對象，所以JsonToObject函數非常有用。它使得開發(fā)人員可以輕松地將JSON數據轉換為Delphi對象，從而更輕松地處理和操作這些數據。