Discussion :

[excalybur]

Bonjour,

En Vb.net l'utilisation que je fait de TreeView dans un GroupBox déroule les répertoires et sous répertoires en une seule colonne verticale comme sur la première image ci-dessous.

Est-il possible (pour raison de manque de place verticale) de créer le même tableau avec deux ou trois colonnes verticale (donc des colonnes parallèles et moins longue)? Comme la deuxième image par exemple.

Si vous avez une idée je suis preneur.

En mode une colonne voir par exemple : https://www.skotechlearn.com/2020/07...iew-vbnet.html

Je vous communique à toute fin utile un extrait de mon code. Ouvrir une form et insérer un bouton. Appeler avec le bouton : LoadFileTest

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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
 
    Tv_ImgList.ImageSize = New Size(32, 32)
    TreeView_Explorer.ImageList = Tv_ImgList
 
end sub
 
 
Public Sub LoadFileTest()
 
    'Affichage des fenêtres roots
    TreeView_Explorer.Visible = True
    TxtBx_Path.Visible = True
 
 
    AddSpecialAndStandardFolderImages()
    AddDriveRootNodes()
 
End Sub
 
Public Sub AddSpecialAndStandardFolderImages() 
 
    AddImageToImgList(Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData), "Folder")
 
    Dim SpecialFolders As New List(Of Environment.SpecialFolder)
 
    For Each sf As Environment.SpecialFolder In SpecialFolders
        AddImageToImgList(Environment.GetFolderPath(sf))
    Next
 
End Sub
 
Public Sub AddDriveRootNodes()
    'affiche les disques de l'ordinatuer
    For Each drv As DriveInfo In DriveInfo.GetDrives
        AddImageToImgList(drv.Name)
        Dim DriveNode As New TreeNode(drv.Name)
        With DriveNode
            .Tag = drv.Name
            .ImageKey = drv.Name
            .SelectedImageKey = drv.Name
            .Nodes.Add("Empty")
        End With
        TreeView_Explorer.Nodes.Add(DriveNode)
    Next
 
End Sub

Ceci donne cette capture d'écran :



Ce que je veux par exemple :



En vous remerciant pour votre aide

[excalybur]

Personne n'a une idée ?

[umfred]

Je ne vois pas, à moins de définir l'origine du TreeView sur un autre noeud.

Le problème de place je ne vois pas trop, à partir du moment où on peux définir sa propriété Scrollable pour définir l'affichage des barres de défilement.

[excalybur]

J'avais pas lu ta réponse. En fait ça serait pratique sur les petits PC portable. Bien sur sur mon écran 32' cela n'est pas nécessaire.

Après fouille sur google US je n'ai rien trouvé permettant cela.

Je laisse tombé. Merci à tous

[excalybur]

J'ai trouvé par hasard un début de réponse intéressante : https://help.syncfusion.com/windowsf...eview-features

[umfred]

J'ai trouvé par hasard un début de réponse intéressante : https://help.syncfusion.com/windowsf...eview-features

A voir si le prix de la licence en vaut la chandelle (ou si éligible à la version community)