Bonjour à tous,
j'ai un soucis avec une partie de code.
J'utilise un composant pour lire un fichier Midi.
Ce composant m'invite à ajouter une procedure avec "AddHandler" pour savoir
a quelle position je me trouve dans le fichier Midi pendant sa lecture :
Private Sub OnPlayback(sender As Object, e As PlaybackCurrentTimeEventArgs)
Dans cette Sub, j'ai du utiliser un Délégué pour renvoyer la valeur retourné par "OnPlayback",
vers une Sub qui se trouve sur "Form1". De cette manière :
Me.Invoke(New Delegate1(AddressOf SubForm1), ValeurPosition)
Dans la Sub "SubForm1", avec la valeur "ValeurPosition", j'alimente des Label...etc...
Tout fonctionne bien.
Sauf quand je quitte le programme.
Dans l'evenement "Form1_FormClosing" j'arrete le composant avec sa fonction "Stop" et
je supprime l'evenement avec "RemoveHandler". Mais rien n'y fait, j'ai systematiquement
cette erreur :

Par contre, si au lieu d'utiliser "Me" j'utilise n'importe quel Controle de Form1 :
Me.Label1.Invoke(New Delegate1(AddressOf SubForm1), ValeurPosition)
l'erreur disparait.
Partager