Delphi 是一種編程語言，它支持使用 JSON 對象進行變量賦值。JSON 是一種輕量級的數據格式，常用于網絡傳輸和存儲數據。在 Delphi 中，可以使用 TJSONObject 類型來創建和操作 JSON 對象。

var
json: TJSONObject;
begin
json := TJSONObject.Create;
try
json.AddPair('name', 'Tom');
json.AddPair('age', TJSONNumber.Create(25));
finally
json.Free;
end;

以上代碼創建了一個名為 json 的 TJSONObject 對象，并向其中添加了兩個鍵值對：'name' 和 'age'。其中，'name' 的值為字符串類型的 'Tom'，'age' 的值為數值類型的 25。注意，在 Delphi 中，需要使用 TJSONNumber 類型來表示 JSON 中的數值類型。

當然，我們還可以從已有的 JSON 字符串中解析出 JSON 對象，從而進行變量賦值：

var
jsonStr: string;
json: TJSONObject;
begin
jsonStr := '{"name":"Tom","age":25}';
json := TJSONObject.ParseJSONValue(jsonStr) as TJSONObject;
try
// do something with json object...
finally
json.Free;
end;

以上代碼將一個 JSON 字符串解析成 JSON 對象，并將其賦值給名為 json 的 TJSONObject 對象。在解析過程中，我們需要使用 TJSONObject.ParseJSONValue 方法，并將其返回值轉換成 TJSONObject 類型。

總之，Delphi 提供了豐富的 JSON 對象操作方法，可以方便地進行變量賦值和數據解析等操作。