Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
RunAll as SetAll but for methods
Message
De
05/10/2006 22:41:44
 
 
À
05/10/2006 21:55:33
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
01159583
Message ID:
01159927
Vues:
18
>>
>>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!
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform