Discussion :

[aviateur22]

bonjour a tous et bonne annee
je crais actuellement un programme m'affichant un nombre indeterminé de dynamic button dans un Panel.
les dynamic button sont bien affichés au lancement du programme. Je souhaite par la suite les effacer afin d'en mettre d'autre dans le panel.
Jai essayé plusieurs methode(avec refresh-update) mais rien ne se passe, mes anciens boutons sont toujours present et les nouveaux n'apparaissent pas.
Si quelqu'un peu me donner un coup de main...
merci d avance de votre aide
cordialement
cyrille

[hacker59]

Bonjour,

donner nous une image ou des codes pour bien comprendre?
Merci, cordialement.

[ranzoken]

Dim c As Control
c = Me.Button2
c.Dispose()

en créant une méthode il ne reste plus qu'a passer en paramètre le control voulu
tout en n'oubliant pas de faire des vérifications


voici un exemple pour vider toutes les forms qui sont placé dans des panel collapsed
même si ce n'est pas votre propre cas ça peut vous éclairer (le form marche avec un clear parceque dans les evenements form_closing le code correspond sinon pour être violent un dispose)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
    Private Sub FermerTouteFenetre()
        For Each c As Control In Me.Controls
            If (c.GetType() Is GetType(SplitContainer)) Then
                Dim sc As SplitContainer = c
                sc.Panel1.Controls.Clear()
                sc.Panel2.Controls.Clear()
            End If
        Next
        Me.gestionPanelCollapsed(Me)
    End Sub

[aviateur22]

Merci beaucoup
Ça marche à la perfection