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;