Soyez le premier à donner votre avis sur cette source.
Vue 5 554 fois - Téléchargée 360 fois
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
bonne continuation à+
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
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)
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)
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.