Right :) There are many other ways more but I only included this one as it was the fastest in my tests (for relatively short list of items).
Cetin
>Hi Cetin,
>
>Regarding your "older" method, I might suggest an alternative:
>
>
>tcStr = "2222 3333 4444 5555"
>tcStr = STRTRAN(tcStr, ' ', chr(13))
>
>for i=1 to memlines(tcStr)
> ...
>endfor
>
>
>
>Hugh
>
>
>>*Older - for short lists this was fastest as I could see
>>tcStr = "2222 3333 4444 5555"
>>tcStr = chrtran(tcStr, " ",",")
>>oDummy = createobject('Listbox')
>>with oDummy
>> .RowSourceType = 1 && Value
>> .RowSource = tcStr
>> dimension arrVals[.ListCount]
>> for ix=1 to .ListCount
>> arrVals[ix] = .List(ix)
>> endfor
>>endwith
>>release oDummy
>>Cetin