Delphi是一個強大的編程語言，它支持多種數據格式。其中，JSON是一種非常常用的數據格式。在Delphi中，要讀取JSON數據需要用到JsonDataObjects庫。該庫支持四個主要的類：TJsonArray, TJsonObject, TJsonValue和 TJsonString。

首先，我們需要使用JsonDataObjects庫獲取JSON對象。

var
jsonObj: TJsonObject;
begin
jsonObj := TJsonObject.Parse('{ "name": "Tom", "age": 25 }') as TJsonObject;
try
//代碼操作jsonObj
finally
FreeAndNil(jsonObj);
end;

在以上代碼中，我們首先創建了一個TJsonObject對象，該對象的值是一個包含"name"和"age"屬性的JSON對象。在try...finally語句中，我們可以對該對象進行操作。在操作結束后，我們需要釋放該對象。

接下來，我們可以使用TJsonObject的GetValue方法獲取JSON對象中的屬性值。

var
nameValue, ageValue: TJsonValue;
begin
nameValue := jsonObj.GetValue('name');
ageValue := jsonObj.GetValue('age');
end;

在以上代碼中，我們使用了TJsonObject的GetValue方法獲取了"name"和"age"屬性對應的值。該方法返回TJsonValue類型的對象。

對于TJsonValue對象，如果我們知道其類型，可以使用AsInt，AsDouble等方法將其轉換為相應的數據類型。如果我們不知道其類型，可以使用AsVariant方法將其轉換為Variant類型。

var
nameStr: String;
ageInt: Integer;
begin
nameStr := nameValue.AsString;
ageInt := ageValue.AsInt;
end;

在以上代碼中，我們使用了TJsonValue的AsString和AsInt方法獲取了"name"和"age"屬性對應的字符串和整數值。

綜上所述，使用Delphi讀取JSON數據是一個比較簡單的任務，只需要使用JsonDataObjects庫中的TJsonObject，TJsonValue等類即可。在實際開發中，我們可以根據實際需求使用不同的類和方法來讀取JSON數據。