>>The new DO CASE based on your reply
>>Thanks all :-)
>>
>>
>>DO CASE
>> CASE nDots > 1
>> lIsField=.F.
>> CASE nDots = 1
>> lIsField= USED(JUSTSTEM(.controlsource)) AND FSIZE(JUSTEXT(.controlsource))>0
>> OTHERWISE
>> lIsField= FSIZE(.controlsource)> 0
>>ENDCASE
>>
>>
>
>Gerald,
>Parsing was prohibited :)?
>Some comments which might never apply :
>-Multiple dots where conrolsource is multiple fields.
>-Dots=0 and isField and alias not the current one
>-Dots=1 this sounds better :
>lIsField= FSIZE(JUSTEXT(.controlsource), JUSTSTEM(.controlsource))>0
>-Dots = 1 but memvar, same name field in current alias && 'm.First_Name'
>-Dots = 0 but old syntax && 'myTable->First_Name'
>
>Cetin
That was a lot of testing for a simple checkbox...
I want a good reaction time and if i do all that testing i will lose a lot of CPU cycles...
I think i will forget about all that stuff and use a normal checkbox
out of sight in the container and let it hold the controlsource.
:-)
If we exchange an apple, we both get an apple.
But if we exchange an idea, we both get 2 ideas, cool...Gérald Santerre
Independant programmer - internet or intranet stuff - always looking for contracts big or small :)
http://www.siteintranet.qc.ca