Bonjour a tous,

Je souhaite faire un bouton du style la croix rouge d'une fenetre , pour cela j'ai fais 3 imprimes écran que j'ai découpé nikel un normal, un lorsque l'on passe dessus et un lors d'un clique.

Le clique et le normal marche.. normal , cependant je souhaite faire marcher celui ou l'on passe avec la souris dessus et la rien n'y fait.

J'utilise la methode MouseMove, le problème c'est que tant que la souris et dans la zone de l'image bah on l'exécute...

Ce qui fait que mon idée suivante ne marche pas:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Private inverse as boolean
 
Private Sub Image1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
 
if inverse=true then
  image1.Picture=loadpicture("clik.gif")
  inverse = false
else
  image1.Picture=loadpicture("no_clik.gif")
  inverse = true
end if
 
End Sub
Forcément sa clignote de cette facon . J'ai beau chercher le seul truc que je trouve c'est genre faire un test de la position de la souris, si elle est encore dans l'image on change pas... etc
Mais pas très court comme méthode mais au pire je ferai sa

merci a tous,

Bastien