B4X

JSON AddArrayCopyAt Example

Demonstrates the AddArrayCopyAt function.

Note: This example requires Chilkat v9.5.0.82 or above.

B4X

Dim json As ChilkatJsonObject
json.Initialize
json.Load("{ " & Chr(34) & "name" & Chr(34) & ": " & Chr(34) & "John" & Chr(34) & ", " & Chr(34) & "marbles" & Chr(34) & ": 100 }")

Dim jarr As ChilkatJsonArray
jarr.Initialize
jarr.Load("[ 1, 2, 3, " & Chr(34) & "apple" & Chr(34) & ", " & Chr(34) & "orange" & Chr(34) & ", [ 10, 20, 30 ], { " & Chr(34) & "name" & Chr(34) & ": " & Chr(34) & "Luther" & Chr(34) & "} ]")

'  Copy the contents of jar to a new array member named "stuff".
'  Insert the array at the 2nd position
json.AddArrayCopyAt(1, "stuff", jarr)

Log(json.Emit)
'  Expected output is:  {"name":"John","stuff":[1,2,3,"apple","orange",[10,20,30],{"name":"Luther"}],"marbles":100}


'  Note: The contents of the array were copied.
'  If we modify the contents of jarr, it does not modify the array contained within "json" because it is a separate copy.
'  For example:
jarr.AddIntAt(-1, 2020)
Log(jarr.Emit)
'  Expected output: [1,2,3,"apple","orange",[10,20,30],{"name":"Luther"},2020]

Log(json.Emit)
'  Remains unchanged: {"name":"John","stuff":[1,2,3,"apple","orange",[10,20,30],{"name":"Luther"}],"marbles":100}