Xbase++ Requires Chilkat v11.0.0+

JSON AppendArray2 Example

Demonstrates the AppendArray2 function. Xbase++

LOCAL oJson
LOCAL oJarr

oJson := CreateObject("Chilkat.JsonObject")
oJson:Load('{ "name": "John", "marbles": 100 }')

//  Append an empty array named "xyz"
oJarr := CreateObject("Chilkat.JsonArray")
oJson:AppendArray2("xyz", oJarr)

? oJson:Emit()
//  Expected output is:   {"name":"John","marbles":100,"xyz":[]}

//  Add elements to the array.
oJarr:AddStringAt(-1, "hello")
oJarr:AddIntAt(-1, 256)

? oJson:Emit()
//  Expected output is:  {"name":"John","marbles":100,"xyz":["hello",256]}

oJson:destroy()
oJarr:destroy()