PureBasic

AppendArrayItems Example

Demonstrates the AppendArrayItems function.

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

PureBasic

IncludeFile "CkJsonArray.pb"

Procedure ChilkatExample()

    jarr1.i = CkJsonArray::ckCreate()
    If jarr1.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    CkJsonArray::ckLoad(jarr1,"[ 1, 2, 3, 4]")

    jarr2.i = CkJsonArray::ckCreate()
    If jarr2.i = 0
        Debug "Failed to create object."
        ProcedureReturn
    EndIf

    CkJsonArray::ckLoad(jarr2,"[ 5, 6, 7, 8]")

    CkJsonArray::ckAppendArrayItems(jarr1,jarr2)

    Debug CkJsonArray::ckEmit(jarr1)
    ; Expected output: [1,2,3,4,5,6,7,8]

    Debug CkJsonArray::ckEmit(jarr2)
    ; Expected output: [5,6,7,8]


    CkJsonArray::ckDispose(jarr1)
    CkJsonArray::ckDispose(jarr2)


    ProcedureReturn
EndProcedure