(Xojo Plugin) Sort JSON Object by Member Key Name

See more JSON Examples

IMPORTANT: This example requires a pre-release for the next version of Chilkat after the current v9.5.0.99 release. Contact info@chilkatsoft.com if you wish to get a pre-release. However, pre-releases of .NET Core (hosted on NuGet) and Node.js will not be possible.

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

Dim json As New Chilkat.JsonObject

Dim success As Boolean
success = json.UpdateString("xyz","1234")
success = json.UpdateString("abc.xyz","1234")
success = json.UpdateString("abc.def","1234")
success = json.UpdateString("abc.aaa","1234")
success = json.UpdateString("ghi","1234")
success = json.UpdateString("nmo","1234")

json.EmitCompact = False
System.DebugLog(json.Emit())

// This is our initial JSON:

// {
//   "xyz": "1234",
//   "abc": {
//     "xyz": "1234",
//     "def": "1234",
//     "aaa": "1234"
//   },
//   "ghi": "1234",
//   "nmo": "1234"
// }

// Sort the top-level JSON object by key.
Dim ascending As Boolean
ascending = True
Dim caseSensitive As Boolean
caseSensitive = True
json.Sort ascending,caseSensitive

// Look at the sorted JSON..
System.DebugLog(json.Emit())

// {
//   "abc": {
//     "xyz": "1234",
//     "def": "1234",
//     "aaa": "1234"
//   },
//   "ghi": "1234",
//   "nmo": "1234",
//   "xyz": "1234"
// }

// Now sort the members of the "abc" object..
Dim jsonAbc As Chilkat.JsonObject
jsonAbc = json.ObjectOf("abc")
jsonAbc.Sort ascending,caseSensitive

// Now look at the JSON with the members under "abc" also sorted..
System.DebugLog(json.Emit())

// {
//   "abc": {
//     "aaa": "1234",
//     "def": "1234",
//     "xyz": "1234"
//   },
//   "ghi": "1234",
//   "nmo": "1234",
//   "xyz": "1234"
// }