Delphi是一種非常流行的編程語言，它提供了很多庫和工具來幫助開發者處理各種數據格式，如XML、CSV、JSON等等。在Delphi中使用JSON是非常常見的一種操作，而解析JSON中的中括號就是其中之一。

在JSON中，中括號可以用來表示一個數組，數組中包含了多個元素。要解析這樣的數據，我們可以使用Delphi提供的一些庫來實現。

下面是一個示例JSON數據：

{
"people": [
{
"name": "Tom",
"age": 18
},
{
"name": "Jack",
"age": 20
}
]
}

我們可以使用Delphi中的TJSONObject和TJSONArray類來解析這個JSON數據：

var
JSON: TJSONObject;
People: TJSONArray;
I: Integer;
Person: TJSONObject;
begin
JSON := TJSONObject.ParseJSONValue('{
"people": [
{
"name": "Tom",
"age": 18
},
{
"name": "Jack",
"age": 20
}
]
}') as TJSONObject;
try
People := JSON.Get('people') as TJSONArray;
for I := 0 to People.Count - 1 do
begin
Person := People.Items[I] as TJSONObject;
ShowMessageFmt('Name: %s, Age: %d', [Person.GetValue('name').Value, Person.GetValue('age').Value.ToInteger]);
end;
finally
JSON.Free;
end;
end;

在以上代碼中，我們使用了TJSONObject.ParseJSONValue方法來解析JSON數據，并將解析得到的結果強制轉換為TJSONObject類型。然后，我們使用TJSONObject.Get方法獲取了JSON中的people數組，并將其強制轉換成TJSONArray類型。最后，我們使用TJSONArray.Count和TJSONArray.Items的屬性來遍歷數組中的每個元素，并將其轉換為TJSONObject類型。通過TJSONObject.GetValue方法，我們可以獲取每個元素中的name和age屬性的值。

總結來說，使用Delphi解析JSON中的中括號非常簡單，只需要使用TJSONObject和TJSONArray這兩個類即可。我們可以通過TJSONArray.Count和TJSONArray.Items屬性及TJSONObject.GetValue方法來遍歷JSON數組中的每個元素，獲取其屬性值。