>>>You can also try ALINES(). It may be even easier and faster.
>>>
>>>lnStart = Thisform.Edit1.SelStart
>>>lcCrLf = CHR(13) + CHR(10)
>>>
>>>lnOccurence = OCCURS(lcCrLf, LEFT(Thisform.Edit1.Text, lnStart))
>>>
>>>ALINES(laLines, Thisform.Edit1.Text)
>>>lcCommand = laLines[lnOccurence + 1]
>>>
>>>
>>
>>One time - it's a typo.
>>
>>Two times - it's a typo.
>>
>>Three times - it's an ignorance.
>
>Well... 45.294.838.848 times - it is a mind of an (almost) old guy that don't follow his fingers velocity anymore <g>
Are you calling Sergey old? :)
If it's not broken, fix it until it is.
My Blog