Creer un menu popup (menu du clic droit!)

Soyez le premier à donner votre avis sur cette source.

Snippet vu 29 387 fois - Téléchargée 67 fois

Contenu du snippet

creez 2 forms:
form1 & form2
mettez un control sur form1
et creez un menu avec descendance sur form2.
nommez l'entete du menu "monmenu"
choisissez l'action MouseDown ou MouseUp
de votre control et mettez ce code:

Source / Exemple :


Private Sub CONTROL_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
PopupMenu Form2.monmenu
End If
End Sub

Conclusion :


Voila!
ça marche meme sur les richtextbox!!!

A voir également

Ajouter un commentaire Commentaires
beezzers
Messages postés
10
Date d'inscription
samedi 19 janvier 2008
Statut
Membre
Dernière intervention
29 mai 2008

29 janv. 2008 à 03:47
Tu peu aussi crée un menu dans la meme form
Le mettre a Visible = False
Et avec le meme code
Sauf pour:

PopupMenu monmenu
Nicolats
Messages postés
1
Date d'inscription
vendredi 15 juillet 2005
Statut
Membre
Dernière intervention
8 janvier 2006

8 janv. 2006 à 15:05
Moi je trouve ca superbe, c'est simple, c'est clairement expliqué et ca marche.
OverBillion
Messages postés
15
Date d'inscription
mercredi 24 septembre 2003
Statut
Membre
Dernière intervention
14 mars 2008

29 sept. 2003 à 22:07
ouais super!
dans le fond je remercie juste pour la syntaxe:

popup (MyMenu as Menu)

jaurais fini par le savoir un jour ou lautre comment faire afficher un menu contextuel pis la ben je le sais!

voila!

merci!
a+
loskiller62
Messages postés
135
Date d'inscription
jeudi 30 janvier 2003
Statut
Membre
Dernière intervention
12 juillet 2006
1
27 févr. 2003 à 19:38
Et comment ut ferme un menu?
J'ai une appli en systray et si je ne clique pas sur un élément du menu celui ne disparait pas de l'écran...
ludkill
Messages postés
6
Date d'inscription
mercredi 14 août 2002
Statut
Membre
Dernière intervention
12 juillet 2007

15 nov. 2002 à 11:45
Ben pour ma part je trouve ca bien mais c pas terrible si tu crée une feuille MDI car le menu de la feuille mere sera remplacé par ton popupmenu de cette feuille fille ou se trouve le popupmenu. Desolé, mais si je dis ca c'est que j'avais fait de cette facon pour le menu contextuel mais en faisant ma feuille MDI c'est là que j'ai eu le probleme.
Afficher les 11 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.