Discussion :

[chouchouilloux]

Bonjour,

Après quelque recherche infructueuse ou mal comprise je viens à vous.

Je cherche a modifier le backgroundimage d'un bouton au survol de la souris dessus et qu'il revienne à la normal à la perte de focus.

J'ai essayer le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Sub but_menu_MouseHover(sender As Object, e As System.EventArgs) Handles but_menu_devis.MouseHover, but_menu_facture.MouseHover, but_menu_article.MouseHover, but_menu_client.MouseHover, but_menu_parametre.MouseHover
        Me.BackgroundImage = My.Resources.Bouton_bleu_hover
    End Sub

En mettant un messagebox j'ai bien le messagebox qui s'affiche mais pour le changement d'image ça ne fonctionne pas.

Sauf si je met le nom du controle en dur mais du coup je dois faire 10 "fonctions" alors que mon but est de réduire au max le code

[Pol63]

sur un evenement, sender est l'objet qui déclenche l'évènement, ce qui est pratique dans le cas où une méthode gère l'évènement de plusieurs instances comme dans ton cas
c'est As Object car ca peut etre des choses différentes
dans ton cas ca sera toujours un bouton donc :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

directcast(sender, button).backgroundimage = lavaleur

[chouchouilloux]

Merci beaucoup, ça faisait 1h que je testais du "for each" ou bien du "focused" et j'avais jamais le bon contrôle.

Merci encore

sur un evenement, sender est l'objet qui déclenche l'évènement, ce qui est pratique dans le cas où une méthode gère l'évènement de plusieurs instances comme dans ton cas
c'est As Object car ca peut etre des choses différentes
dans ton cas ca sera toujours un bouton donc :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

directcast(sender, button).backgroundimage = lavaleur