Bouton

cs_viseca Messages postés 15 Date d'inscription jeudi 17 juin 2004 Statut Membre Dernière intervention 15 septembre 2007 - 8 juil. 2004 à 21:44
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 - 9 juil. 2004 à 08:47
Allo

Existe t-il un moyen pour que quand je passe la sourie sur mon bouton (qui est une image que j'ai fait) qu'il puisse changer d'aspet. je sais que je dois crée deux images, mais le reste ...

Merci

2 réponses

cs_rene38 Messages postés 1858 Date d'inscription samedi 29 juin 2002 Statut Membre Dernière intervention 17 octobre 2013 11
8 juil. 2004 à 23:18
Bonsoir
Ton bouton Command1 étant en style Graphical,

Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.Picture = LoadPicture("c:\Chemin\dessin1.jpg")
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.Picture = LoadPicture("c:\Chemin\dessin2.jpg")
End Sub
0
cs_DARKSIDIOUS Messages postés 15814 Date d'inscription jeudi 8 août 2002 Statut Membre Dernière intervention 4 mars 2013 130
9 juil. 2004 à 08:47
Oui rene, ce code est bon, mais le problème, c'est si le bouton n'est pas sur une feuille, ou s'il est à côté d'autres boutons, ca ne fonctionnera pas comme voulu.

Le plus facile et sécuritaire, c'est de capturer les événements souris lorsque la souris passe sur le bouton par la fonction de l'API SetCapture, puis de la libérer lorsqu'elle n'y est plus pas la fonction de l'API ReleaseCapture.

Enfin bref, un exemple vaut mieux qu'un discours : tu trouvera le même exemple dans les exemples du ProgOtoP API Viewer.

DarK Sidious

[Responsable API/VB du site www.ProgOtoP.com]
Téléchargez ProgOtoP API Viewer
0
Rejoignez-nous