Menu contextuel apparaissant au pointeur de la souris (débutant)

Soyez le premier à donner votre avis sur cette source.

Vue 5 588 fois - Téléchargée 361 fois

Description

Bah je suis pas tres fort parceque je debute et j'espere que ca servira et surtout j'espere que les masters du coin modifiront le code...

Vous avez besoin de deux form, reglés avec les parametres suivants:
Une form1 assez grande
form1: Scale = Twip

Une form2 nettement plus petite que la form1 et rouge !!
avec border style = none
scale = Twip
startup position = manual

rentrez le code dans form1

Si vous ne faites pas ca risque pas de fonctionner

Source / Exemple :


Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

  Form2.Top = Y  'indique sur l'axe Y ou doit commencer le dessin de la fenetre
  Form2.Left = X  'indique sur l'axe X ou dot commencer le dessin de la fenetre

          If Button = 2 Then 'Si le bouton droit de la souris change d'état sur la form1 alors...
             Form2.Show 'Affiche la form2
          End If

          If Button = 1 Then 'si le bouton gauche de la souris change d'état sur la form1 alors..
             Unload Form2 'cache la form2
          End If
End Sub

Private Sub Form_Unload(Cancel As Integer) 'Quand la form1 est déchargée
   Form2.Hide  'cache ma form2
End Sub

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
7
Date d'inscription
mardi 26 août 2003
Statut
Membre
Dernière intervention
15 septembre 2003

super merci
Messages postés
3
Date d'inscription
dimanche 16 juin 2002
Statut
Membre
Dernière intervention
30 août 2003

Merci moi aussi je débute et ta source m'est très utile ;)))

bonne continuation à+
Messages postés
31
Date d'inscription
mercredi 18 octobre 2000
Statut
Membre
Dernière intervention
8 avril 2004

non mais ca je le savais... c un tuto de base

mais a moins que je ne me trompe tu peux pas y faire ce que tu veux genre charger des images, changer la modif la tronche du bouton etc etc tout bonnement parceque c l'interface de windows qui prend cela en compte
Messages postés
20
Date d'inscription
jeudi 22 novembre 2001
Statut
Membre
Dernière intervention
5 juin 2007

Salut
Chui pas un master, mais si tu veux faire une menu contextuel simple ben il te suffit de créé un menu que tu l'affiche pas. Ensuite tu utilise la fonction popupmenu
ex: popupmenu <nom tu menu>
Petite Info le nom du menu c le nom du menu principal. (Fichier par exp)
Messages postés
20
Date d'inscription
jeudi 22 novembre 2001
Statut
Membre
Dernière intervention
5 juin 2007

Salut
Chui pas un master, mais si tu veux faire une menu contextuel simple ben il te suffit de créé un menu que tu l'affiche pas. Ensuite tu utilise la fonction popupmenu
ex: popupmenu <nom tu menu>
Petite Info le nom du menu c le nom du menu principal. (Fichier par exp)
Afficher les 6 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.