Bonsoir,
Je cree des Boutons dynamiquement (qu'on peut bouger avec MouseMove) avec possibilities de les enlever tous:
Cependant, cela ne marche pas toujours tres bien. Il faut que je passe au moins 3 fois dans la routine "ClearPanel" pour tout enlever (24 au total) ou repeter 3 fois le ForEach dans cette Sub.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 Private Sub ClearPanel() For Each b As Button In myPanel.Controls myPanel.Controls.Remove(b) RemoveHandler aButton.MouseDown, AddressOf aButton_MouseDown RemoveHandler aButton.MouseUp, AddressOf aButton_MouseUp RemoveHandler aButton.MouseMove, AddressOf aButton_MouseMove Next End Sub
Je ne comprends pas pourquoi un seul passage ne fait pas le travail, y-a-t-il une explication a ce probleme? Ou bien, ce code qui me parait tres simple n'est pas bon???
De plus, dois-je enlever les evenements crees dynamiquement avec "RemoveHandler" dans cette routine? Je pense que oui, mais si vous pouvez confirmer ce detail.
A+
JLuc01
Partager