Delphi是一種面向對象的編程語言，它可用于創建各種類型的應用程序。其中，json讀取是很常見的需求，下面介紹如何在Delphi中使用json讀取庫。

uses
Data.DBXJSON, System.JSON;
var
json : TJSONObject;
jsonArray : TJSONArray;
jsonValue : TJSONValue;
jsonPair : TJSONPair;
begin
// 從文件或字符串中讀取json數據
json := TJSONObject.ParseJSONValue(TEncoding.UTF8.GetBytes(jsonString), 0) as TJSONObject;
// 獲取json對象
jsonPair := json.Get(0);
jsonValue := jsonPair.JsonValue;
// 將json對象轉換為數組
jsonArray := jsonValue as TJSONArray;
// 遍歷數組中的每個元素
for i := 0 to jsonArray.Count - 1 do
begin
// 獲取當前元素的json對象
jsonValue := jsonArray.Items[i];
// 獲取json對象中的值
jsonPair := jsonValue as TJSONPair;
key := jsonPair.JsonString.Value;
value := jsonPair.JsonValue.Value;
// 處理獲取到的值
// TODO
end;
end;

以上代碼實現了從字符串中讀取json數據，獲取json對象，將json對象轉換為數組，并遍歷每個元素獲取其中的鍵值對。在實際使用中，可以按照具體的需求來處理獲取到的值。