Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
RunAll as SetAll but for methods
Message
From
05/10/2006 22:41:44
 
 
To
05/10/2006 21:55:33
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
01159583
Message ID:
01159927
Views:
17
>>
>>Lparameters toObject
>>
>>Local loChildObject As Control
>>
>>If Pemstatus(m.toObject, [MouseWheel], CON_PEMSTAT_DEFINED)
>>	Bindevent(m.toObject, [MouseWheel], This, [MouseWheel], 1)
>>Endif
>>
>>If Pemstatus(m.toObject, [Objects], CON_PEMSTAT_DEFINED)
>>	For Each m.loChildObject In m.toObject.Objects
>>		This.ctl32_BindMouseWheel(m.loChildObject)
>>	Endfor
>>Endif
>>
>>
>>Carlos
>
>Thanks for your comment, Carlos. Your BindEvent implementation would probably be more efficient that RunAll().
>

Ken

Weird.. I posted that code as an example of iterating thru all of a form's controls, using the objects collection, I never realized the implications of the bindevent statements in the code, related to your post... I see it now that you mention it.

In that case I am binding to an Event, but you could as well bind to a form method that could be also present in the controls of the form, and instead of doing the runall() you would just do thisform.xyz()

I assume that is what you saw could be done, by looking at my code. Glad I could help... without even knowing that i was!
Previous
Reply
Map
View

Click here to load this message in the networking platform