PureBasic

StringBuilder GetNth

Demonstrates the GetNth method. PureBasic

IncludeFile "CkStringBuilder.pb"

Procedure ChilkatExample()

    ; The GetNth method is handy for getting parts from delimited strings.
    ; For example:

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

    CkStringBuilder::ckAppend(sb,"red,blue," + Chr(34) + "green,purple" + Chr(34) + ",,yellow")

    delimiterChar.s = ","
    exceptDoubleQuoted.i = 1
    exceptEscaped.i = 1

    ; Prints "[red]"
    Debug "[" + CkStringBuilder::ckGetNth(sb,0,delimiterChar,exceptDoubleQuoted,exceptEscaped) + "]"

    ; Prints "[blue]"
    Debug "[" + CkStringBuilder::ckGetNth(sb,1,delimiterChar,exceptDoubleQuoted,exceptEscaped) + "]"

    ; Prints "[green,purple]"
    Debug "[" + CkStringBuilder::ckGetNth(sb,2,delimiterChar,exceptDoubleQuoted,exceptEscaped) + "]"

    ; Prints "[]"
    Debug "[" + CkStringBuilder::ckGetNth(sb,3,delimiterChar,exceptDoubleQuoted,exceptEscaped) + "]"

    ; Prints "[yellow]"
    Debug "[" + CkStringBuilder::ckGetNth(sb,4,delimiterChar,exceptDoubleQuoted,exceptEscaped) + "]"

    ; Prints "[]"
    Debug "[" + CkStringBuilder::ckGetNth(sb,5,delimiterChar,exceptDoubleQuoted,exceptEscaped) + "]"


    CkStringBuilder::ckDispose(sb)


    ProcedureReturn
EndProcedure