在Delphi中，我們可以使用TJSONObject和TJSONArray類來處理JSON數據。其中，TJSONArray用于處理JSON數組。

若要獲取JSON數組的長度，我們可以使用TJSONArray類的Count屬性。例如：

var
jsonArray: TJSONArray;
begin
jsonArray := TJSONArray.Create;
jsonArray.Add('apple');
jsonArray.Add('banana');
jsonArray.Add('orange');
ShowMessage(IntToStr(jsonArray.Count));
end;

上述代碼會創建一個包含3個元素的JSON數組，并彈出一個消息框顯示“3”。

除此之外，我們還可以用TJSONArray類的Size方法獲取JSON數組的長度。與Count屬性不同的是，Size方法返回的是UInt64類型，可以處理更大的數組長度。示例代碼如下：

var
jsonArray: TJSONArray;
begin
jsonArray := TJSONArray.Create;
jsonArray.Add('apple');
jsonArray.Add('banana');
jsonArray.Add('orange');
ShowMessage(UIntToStr(jsonArray.Size));
end;

上述代碼會創建一個包含3個元素的JSON數組，并彈出一個消息框顯示“3”。