Soyez le premier à donner votre avis sur cette source.
Vue 5 732 fois - Téléchargée 376 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
13 sept. 2003 à 06:57
17 juin 2002 à 21:59
bonne continuation à+
9 avril 2002 à 17:07
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
9 avril 2002 à 14:16
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)
9 avril 2002 à 14:16
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.