Problème avec les RemoveHandler

Bonjour à tous j'ai un problème avec l'utilisation de RemoveHandler,

Je l'utilise comme dans la doc officiel mais j'obtiens un Warning,

Voici le code correspondant :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 Private Sub curseur_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles curseur.Click 'Demarage de la partie 'Quand la souris bouge sur le curseur et sur le panel on doit modifier sa position 'On ajoute donc les Handlers AddHandler curseur.MouseMove, AddressOf deplacer_curseur AddHandler pnlJeux.MouseMove, AddressOf deplacer_curseur 'Si la souris sort du panel (zone de jeux), on met le jeu en pause AddHandler Me.MouseMove, AddressOf Pause 'On lance le timer qui gère le mouvement des obstacles timeMouvement.Enabled = True 'On lance End Sub Private Sub Pause() 'On met le jeu en arretant le timer timeMouvement.Enabled = False 'On enlève les Handlers pour que le curseur ne puisse plus bouger RemoveHandler pnlJeux.MouseMove, AddressOf deplacer_curseur RemoveHandler curseur.MouseMove, AddressOf deplacer_curseur Label1.Text = "Sortie" End Sub
J'obtiens le warning suivant :

Citation:

L'expression 'AddressOf' n'a pas d'effet dans ce contexte, car l'argument de la méthode pour 'AddressOf' requiert une conversion souple en type délégué de l'événement. Assignez l'expression 'AddressOf' à une variable et utilisez la variable pour ajouter ou supprimer la méthode comme gestionnaire.

J'ai vraiment besoin de retirer ces Handles

Merci d'avance de votre réponse !

et la définition de deplacer_curseur ?

Merci de ton aide !

Donc voici le code de ma procédure :

Code:

1
2
3
4
5
6
    Private Sub deplacer_curseur()
        'On calcul les nouvelles coordonnée de la picture box
        'On récupère les coordonées de la souris par rapport au Panel
        'Et on position la souris sur le centre du curseur avec New Point(23.5,12)
        curseur.Location = pnlJeux.PointToClient(MousePosition) - New Point(23.5, 12)
    End Sub

En espérant que ça peut aider

oui, ta sub ne répond pas à la définition de l'évènement

Code:

Private Sub deplacer_curseur(sender as object, e as [voir selon l'évènement])