>>
>>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
Resending in case you miss the branch.
I was afraid codes would work between qutations and it was the case. So I write the sequence sperated by underscores :
Start : <_P_R_E_> End : <_/_P_R_E_>