Anzahl Einträge in JsonArray

[rotwildmarcy]

Guten Abend,

ich muss für einen Schleifendurchlauf die Anzahl Einträge im JsonArray wissen.

Ich dachte, da käme man mit JsonArray.Count dran. Das wirft mir aber eime Zugriffsverletzung aus.

Delphi-Quellcode:

For i := 0 to JSonArray.Count do
Begin
   JSonObject := TJSonObject.Create;
   JsonValue:=JSonObject.ParseJSONValue(st);
   if (JSONValue is TJSONArray) then
    id := ((JSONValue as TJSONArray).Items[i] as TJSonObject).Get('id').JSONValue.Value;
    name := ((JSONValue as TJSONArray).Items[i] as TJSonObject).Get('name').JSONValue.Value;
    stringgrid1.Cells[1,j] := id;

Danke vorab für eine Tip in die richtige Richtung.