Discussion :

[Bacube]

Bonjour à tout le monde,


J'ai un petit problème, sur ma form, j'ai un SplitContainer ancrer sur toute la fenêtre, et quand je mets un panel (de manière graphique), il se met dessus (logique).

Je souhaiterai le faire apparaitre sur la form directement, quand je cache via un bouton le StripContainer, je voudrais voir le panel et inverssement. J'ai vu des petites choses via le "parent". J'ai testé sans succès.

Voici différent test qui ne marche pas que j'ai effectué :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Application_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
 
 
        Me.Controls.Add(PNL_General)
 
        PNL_General.Parent = Me
        PNL_General.Visible = True
        PNL_General.Enabled = True
 
        PNL_General.Show()
 
End Sub

Je ne sais pas s'il y a une méthode pour forcer le panel à se mettre sur la form et non pas sur le SplitContainer.


Cordialement,
Bacube

[-N4w4k-]

Salut,

Il faut que tu ajoute ton panel aux controls de ton form/splitcontainer:

Code :

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

Me.Controls.Add(panel) 'Me fait référence au container que tu veux

[Bacube]

Oui, le "Me" fait référence à ma form "Application". Pour ça que je ne comprend pas que le panel ne passe pas sur mon formulaire ...

[-N4w4k-]

Ah oui pardon j'avais pas vu que tu le faisait déjà..

Chez moi ce code fonctionne parfaitement:

Form1

Code :

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

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
    Dim p As Panel
 
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
 
        p = New Panel
        p.Location = New Point(50, 50)
        p.Size = New Size(50, 50)
        p.BackColor = Color.Blue
 
        Me.Controls.Add(p)
 
    End Sub
 
 
    Private Sub ButtonToggleContainer_Click(sender As System.Object, e As System.EventArgs) Handles ButtonToggleContainer.Click
 
        If p.Parent Is Me Then
            'ajout dans un panel
            Panel1.Controls.Add(p)
        Else
            'ajout dans le form
            Me.Controls.Add(p)
        End If
 
    End Sub

[Bacube]

le SplitContainer pose problème ou son ancrage, car quand je demande de mettre le panel sur la form directement j'ai rien, mais quand je demande de mettre le panel dans le split, là ça marche...

[-N4w4k-]

Cela peut venir de plein de choses: docking, autosize, etc.
On n'a pas assez d'élément pour pouvoir réellement t'aider..

Mon conseil, vérifie les différentes propriétés(comme celles citées au dessus) de tes composants (de ton panel surtout) et essaie de jouer un peu avec..