Xbase++ Requires Chilkat v11.0.0+

JSON AppendObject2 Example

Demonstrates the AppendObject2 function. Xbase++

LOCAL oJson
LOCAL oJObj

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

//  Append an empty object named "addr"
oJObj := CreateObject("Chilkat.JsonObject")
oJson:AppendObject2("addr", oJObj)

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

//  Add members to the object.
oJObj:AppendString("street", "1200 Elm St.")
oJObj:AppendString("city", "Springfield")
oJObj:AppendInt("zip", 60606)

? oJson:Emit()
//  Expected output is:  {"name":"John","marbles":100,"addr":{"street":"1200 Elm St.","city":"Springfield","zip":60606}}

oJson:destroy()
oJObj:destroy()