Image qui change lors du passage du curseur

Jeff -  
 Midou -
Ce que l'on veut faire, c'est de créer un bouton que lorsque le
curseur ( La souris ) passe au-dessus du bouton, l'image du bouton
change. Mais sans click de la part de l'utilisateur du programme.
Exemple Nhl 2002 le menu principal il y a des icones dans lequel
l'image change, mais que le joueur n'a même pas fait de click sur
l'image. ( Visual Basic 6.0 ) Merci
A voir également:

3 réponses

lcfnancy Messages postés 246 Statut Membre 53
 
frontpage fait ca tout seul en ajoutant un peu de JS
0
Shen Ker
 
je connais pas trop Visual Basic 6 mais je connais bien Builder c++ 5 qui est identique mais en C++
il doit y avoir un champ image dans ton bouton qui doit apparaitre dans l'inspecteur d'objet, là ou tu as du mettre ton image. si tu clique sur les evenements du bouton, il doit y avoir aussi un envenement OnMouseMouse dans le genre, et dans cette fonction tu y met ta nouvelle image ! mais n'oublie pas remettre l'ancienne dans l'evenement OnMouseOut ( pas tres clair, mais bon )

bonne chance ...

Shen Ker
0
asma
 
salut
il ya une option dans dreamweaver version4
dans la barre d'outil ou vous pouvez inserer deux images différente la première statique et la deuxième dynamique lorsqu'elle est cliquable
@+
0
Midou
 
si j ai bien compris ta question voici la reponse :
si ton bouton s'appelle commad1 alors tu ajoute le code suivant :
---------------------
Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.Picture = LoadPicture("repertoire\nouvelIcone")
End Sub
---------------------
ton (nouvelIcone )doit etre dans ( repertoire )
exemple:
----------------------------
Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.Picture = LoadPicture("c:\Ibmtools\pc.ico")
End Sub
------------------------------
et quand la souris quitte le bouton tu peux ajouter le meme code pour
ta feuille (Form)
------------------------------
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.Picture = LoadPicture("repertoire\iconeInitial.ico")
End Sub
------------------------
où codeInitial est celui de dans la proprieté Picture de ton bouton
bonne chance
0