Lianja

StringTable SplitAndAppend Example

Demonstrates the StringTable SplitAndAppend method. Lianja

loStrTab = createobject("CkStringTable")

// SplitAndAppend make it easy to break apart comma delimited, semicolon delimited,
// or strings delimited by other characters.
s = 'abc,123,xyz,456,music,math,"World History","Chicago,Cubs",Japan'

loStrTab.SplitAndAppend(s,",",.T.,.T.)

i = 0
lnNumStrings = loStrTab.Count
do while i < lnNumStrings
    ? str(i) + ": " + loStrTab.StringAt(i)
    i = i + 1
enddo

// The output is: 
// 0: abc
// 1: 123
// 2: xyz
// 3: 456
// 4: music
// 5: math
// 6: "World History"
// 7: "Chicago,Cubs"
// 8: Japan

// Note: Keeping the quotes is intentional.


release loStrTab