Retrieves the value of a specified element from a JSON array. If the array element does not exist in the JSON array or the array element does not contain a JSON object value nothing happens.
Json.bdh
JsonArrayGetObjectElement( in handle : number, in index : number, out value : number ): boolean;
Parameter | Description |
---|---|
handle | Valid handle to a JSON array |
index | The index position in the JSON array. Lower bound is zero (0). |
value | Parameter that contains the value of the specified element. The value is a handle to a JSON object |
transaction TMain var jsonText : string; jsonArray, i, elementValue, objectId : number; begin WebParseDataBound(jsonText); WebPageUrl("http://mycompany.com/api/jsondata"); jsonArray := JsonParse(jsonText); for i := 0 to (JsonGetArrayLength(jsonArray) - 1) do JsonArrayGetObjectElement(jsonArray, i, elementValue); JsonGetNumberProperty(elementValue, "Id", objectId); Print("Object at index " + string(i) + " has the id " + string(objectId)); end; JsonFree(jsonArray); end TMain;