(PureBasic) Append New Item to JSON Array
Demonstrates the notations that can be used in a JSON array index to append to the end of an array.
IncludeFile "CkJsonObject.pb"
Procedure ChilkatExample()
; Starting in Chilkat v9.5.0.77, the following notations are possible to specify that the value
; should be appended to the end of the array. (In other words, if the array currenty has N elements, then "-1", "", or "*"
; indicate an index of N+1.
json.i = CkJsonObject::ckCreate()
If json.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
CkJsonObject::ckUpdateInt(json,"lanes[-1]",0)
CkJsonObject::ckUpdateInt(json,"lanes[]",1)
CkJsonObject::ckUpdateInt(json,"lanes[*]",2)
CkJsonObject::ckUpdateInt(json,"lanes[-1]",3)
Debug CkJsonObject::ckEmit(json)
; Output is: {"lanes":[0,1,2,3]}
CkJsonObject::ckDispose(json)
ProcedureReturn
EndProcedure
|