Hi Naomi:

Sergey's solution (VARREAD()) works. I'm not working with forms at all. It's an old Clipper program with SAYs and GETs.

Thanks,

Yossi

>Disregard my previous answer, I didn't understand your question.
>
>If you're would be using form and form's object, you can use iif(type('_screen.ActiveForm.ActiveObject.value' = 'C', _screen.ActiveForm.ActiveObject.value, '')
>
>>Hi All:
>>
>>I am converting a Clipper progarm to VFP and I would like to figure how to simulate the F1 key in Clipper, which automatically executes a program called HELP.
>>
>>Here is some documentation from Clipper:
>>
>>

>>After a key is redefined, pressing it executes the specified
>>     procedure, passing three automatic parameters corresponding to
>>     PROCNAME(), PROCLINE(), and READVAR().  
>>
>>READVAR() returns the name of the variable associated with the current
>>     Get object or the variable being assigned by the current MENU TO command
>>     as an uppercase character string.
>>

>>
>>I have it almost right:
>>
>>

>>ON KEY LABEL F1 do Help with program(), lineno(), ???????.
>>

>>
>>How do I pass the current get object, as in:
>>
>>

>>@ 12,12 get TestVar
>>

>>
>>So, if I press F1 while in that field, I would like HELP.PRG to receive 'TestVar' in the third parameter.
>>
>>Thanks,
>>
>>Yossi