>>
>>SELECT (THIS.Parent.Parent.RecordSource)
>>if SEEK(UPPER(THIS.cSearchString),cAliasToSearch,this.cSeekTag)
>> if cAliasToSearch # THIS.Parent.Parent.RecordSource
>> =seek(eval(cAliasToSearch+"."+relation(1)),THIS.Parent.Parent.RecordSource,relation(1))
>> endif
>> IF THIS.nHoldRecord#RECNO(THIS.Parent.Parent.RecordSource)
>> THIS.lSeekMode=.T.
>> ENDIF
>>ELSE
>> GO THIS.nHoldRecord in (THIS.Parent.Parent.RecordSource)
>>ENDIF
>
>Hi Cetin,
>
>I'm studying this thing now. But I'm curious. How do you get the spaces to stay in your message? Everytime
>I put spaces into a message here on the UT, they get eliminated. I can't even put a "." at the front of the
>line to prevent trimming it.
> For example: I indented this line about 20 spaces.
>
>Bill
To make spaces appear as you enter put "

" at the start and "

" at the end. But I don't know why code section has extra linefeeds.