Replaces the value of a specified element from a JSON array. If the array element does not exist in the JSON array, a new element with the specified value will be appended to the array. If the array element does not contain a JSON array value, nothing happens.
Json.bdh
JsonArraySetArrayElement( in handle : number,
in index : number,
in 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 | A handle to the JSON array, which should be the new value of the element |
transaction TMain
var
jsonText : string;
jsonArray, newValue : number;
begin
WebParseDataBound(jsonText);
WebPageUrl("http://mycompany.com/api/jsondata");
jsonArray := JsonParse(jsonText);
newValue := JsonParse("[0,1,2,3,4]");
JsonArraySetArrayElement(jsonArray, 1, newValue);
/* add new value
* index of the new value := size
* size := size + 1 */
JsonArraySetArrayElement(jsonArray, 999999, newValue);
JsonFree(newValue);
JsonFree(jsonArray);
end TMain;