Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
How can I set the property of a button from a procedure?
Message
From
16/04/1998 14:23:34
 
 
To
16/04/1998 14:05:31
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00092543
Message ID:
00092627
Views:
31
>>>>>>>>>>>>>>How can I set the property of a button from a procedure?
>>>>>>>>>>>>>>From a menu option and in a procedure file, I want to enable
>>>>>>>>>>>>>>a button on my form. any ideas?
>>>>>>>>>>>>>
>>>>>>>>>>>>>As long as you keep reference to a form, you can use this reference:
>>>>>>>>>>>>>oApp.frm1.cmdButton.enabled=.t.
>>>>>>>>>>>>---
>>>>>>>>>>>>OK - we said you could createobject for a class and reference a method
>>>>>>>>>>>>from that class, but we did not say anything about creatobject with a FORM
>>>>>>>>>>>>and reference objects on that from? can I :
>>>>>>>>>>>>omy_form = createobject("myform") and then
>>>>>>>>>>>>omy_form.cmdbutton.enabled - .t. ????
>>>>>>>>>>>>can I do this? and it this the way it is done?
>>>>>>>>>>>
>>>>>>>>>>>Yes, you should link form object to variable or much better to app object property:
>>>>>>>>>>>oApp.Frm1=createobject("class1")
>>>>>>>>>>>or
>>>>>>>>>>>DO FORM frm1 name oApp.frm1 linked
>>>>>>>>>>---
>>>>>>>>>>I tried to o.my_form=createobject("my_from") and I got an
>>>>>>>>>>error message saying: class definition MY_FORM not found?
>>>>>>>>>>can you help with this? MY_FORM is my main FORM.
>>>>>>>>>
>>>>>>>>>You had it:
>>>>>>>>>DO FORM frm1 name oApp.frm1 linked
>>>>>>>>---
>>>>>>>>I guess I have missed a step.
>>>>>>>>I want to reference a button on a form, but my form is not a class.
>>>>>>>>could you please me a smal sample of code to do this?
>>>>>>>
>>>>>>>Rob, i just gave you the sample. Did you read replies? Repeating:
>>>>>>>DO FORM frm1 name oApp.frm1 linked
>>>>>>>oApp.frm1.cmdButton.Enabled=.t.
>>>>>>---
>>>>>>Here is the code I am using and it is not working:
>>>>>>DO FORM updatcal oApp.updatcal linked
>>>>>>oApp.updatcal.cmdenterquery.Enabled=.t.
>>>>>>is this all the code?
>>>>>
>>>>>Where is name? Should i repeat one more time?
>>>>---
>>>>OK - I put name in..
>>>>DO FORM updatcal name oApp.updatcal linked
>>>> oApp.updatcal.cmdenterquery.Enabled=.t.
>>>>Now I get an error message saying: property UPDATCAL is not found.
>>>>UPDATCAL is the name of my FORM.
>>>
>>>That's good enough, but also you should have oApp object with property Updatcal
>>---
>>Please hang in there - we are almost home -
>>I am not sure how to make a oApp object with property Updatcal?
>>Remeber, all i want to do is call mybutton.enabled = .t. from a file.
>
>I will remember.
>oApp=createobject("clApp")
>
>Define Class clApp as custom
>updatcal=.NULL.
>Enddefine
---
In my main.prg, I have:
oform=createobject("myform")
and
Define Class myform as custom
updatcal=.NULL.
Enddefine

From a menu option in a procedure file,
I have:
DO FORM updatcal name oform.updatcal linked
oform.updatcal.cmdenterquery.Enabled=.t.
I am getting an error message saying, Unknown member CMDENTERQUERY...
Robert Keith
Independent Developer
San Antonio, Texas
E-mail address:
rebelrob1@yahoo.com
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform