(Xojo Plugin) Create a JSON Array of Objects

Demonstrates how to create a JSON array of objects.

Chilkat Xojo Plugin Download Xojo Plugin for Windows, Linux, Mac OS X, and ARM, ARM64

Dim arr As New Chilkat.JsonArray

Dim success As Boolean

// Add an empty object at the 1st JSON array position.
success = arr.AddObjectAt(0)
// Get the object we just created.
Dim obj As Chilkat.JsonObject
obj = arr.ObjectAt(0)
success = obj.UpdateString("Name","Otto")
success = obj.UpdateInt("Age",29)
success = obj.UpdateBool("Married",False)

// Add an empty object at the 2nd JSON array position.
success = arr.AddObjectAt(1)
obj = arr.ObjectAt(1)
success = obj.UpdateString("Name","Connor")
success = obj.UpdateInt("Age",43)
success = obj.UpdateBool("Married",True)

// Add an empty object at the 3rd JSON array position.
success = arr.AddObjectAt(2)
obj = arr.ObjectAt(2)
success = obj.UpdateString("Name","Ramona")
success = obj.UpdateInt("Age",34)
success = obj.UpdateBool("Married",True)

// Examine what we have:
arr.EmitCompact = False
System.DebugLog(arr.Emit())

// The output is:

// [
//   {
//     "Name": "Otto",
//     "Age": 29,
//     "Married": false
//   },
//   {
//     "Name": "Connor",
//     "Age": 43,
//     "Married": true
//   },
//   {
//     "Name": "Ramona",
//     "Age": 34,
//     "Married": true
//   }
// ]