De rien (et merci).
Le 17 avr. 07 à 19:38 Soir, frael a écrit:
Ton idée est la bonne, ca résout mon problème
Bravo et merci !!!
Marc
---------------------------------------------------------
Le 17 avr. 07 à 19:00, Arnaud Nicolet a écrit :
Pour affiner ma réponse, je pensais à mettre "return true" pour
générer le "MlouseDrag" et "return false" pour générer le
"ConstructContextualMenu", donc, dans mon exemple:
Function MouseDown(AllTheParameters) As Boolean
if IsCMMClick then 'Un menu contextuel est demandé
return false 'L'événement ConstructContextualMenu va être appelé.
Créer le menu contextuel là-bas.
else
Return True 'L'événement MouseDrag va être appelé.
end if
end function
Le 17 avr. 07 à 18:45 Soir, frael a écrit:
Oui, ca marche bien, mais Langage Reference a dit:
<<
RectControl.ConstructContextualMenu Event
Fires whenever it is appropriate to display a contextual menu for
the control. This is the recommended way to handle contextual
menus because this event figures out whether the user has
requested the contextual menu, regardless of how he did it.
>>
Et donc je voulais m'en servir !!!!
Comme quoi fo mieux pas lire les docs....... naaan jrigole
Merci
Marc
-----------------------------------------------------------------
Le 17 avr. 07 à 18:19, Arnaud Nicolet a écrit :
Et avec la fonction IsCMMClick?
Quelque chose du genre:
if IsCMMClick then 'Un menu contextuel est demandé
return false
else
Return True
end if
Le 17 avr. 07 à 17:37 Soir, frael a écrit:
Le parent, ou l'initialparent, sont tous les 2 à vide ou nil ...
mais j'ai trouvé le gag:
il suffit ds la fenetre de renvoyer TRUE à levent
MouseDown.............. beuh
moi j'en ai besoin pour gérer des MouseDrag ds cette fenetre
à noter: ca interrompt les ConstructContextualMenu sur tous les
controles de la fenetre, sauf ceux qui sont par dessus une
liste (ya ptet d'autres cas...), mais par contre les MouseDown
sur chaque controle passent bien (c'est normal)
ci-joint projet essai : http://malabel.free.fr/RB/
A moins que qqn ait une idée ??? :-)
Marc
-------------------
Le 17 avr. 07 à 14:08, Arnaud Nicolet a écrit :
Le 17 avr. 07 à 10:34 Matin, frael a écrit:
- nouveauté: ca passe ds ConstructContextualMenu qd le
rectangle est sur une listbox visible et Enbled !!!!!!
Vous devriez tester si le parent du rectangle est celui auquel
vous vous attendiez.
Quelque chose comme ça:
dim c As Control
c=Rectangle1.Parent
Break
Et vous examinez c.
|