IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB 6 et antérieur Discussion :

Probleme sur treeview


Sujet :

VB 6 et antérieur

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Juin 2006
    Messages
    105
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2006
    Messages : 105
    Par défaut Probleme sur treeview
    Bonjour ,

    je souhaite creer de façon automatique (avec un algorithme performant)
    un treeview avec 2 enfants et 3 niveaux de profondeurs.
    Ici j'arrive seulment à creer avec cet algo les 2 enfants.
    Aussi apres avoir reussi cela ça devrai me permettre
    de pouvoir paramettrer le nombre d'enfants et le niveau de profondeur.

    voici un bout de mon code , Merci pour vos aides et avis

    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
    'procedure en cours de validation pour une construction dynamique
    Private Sub cmdactualiser_Click()
    'Dim x,p As Variant
    Dim s As String
    Dim cpt1, cpt2, x, p As Integer
    Dim enf, prof As Integer
        TreeView1.Nodes.Add , , "main", "1" 'noeud principale
        '15 noeuds, 2 enfants, profondeur 3
    enf = 2
    prof = 3
        x = 2
        p = x
        s = CStr(x)
        For cpt1 = 1 To enf
            TreeView1.Nodes.Add "main", tvwChild, p & "a", s 'noeud fils du noeud principal
     
            p = p + 1
            s = CInt(s)
            s = x + 1
            s = CStr(s)
            Next cpt1
    end sub

  2. #2
    Expert confirmé

    Homme Profil pro
    Inscrit en
    Août 2005
    Messages
    3 317
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Isère (Rhône Alpes)

    Informations professionnelles :
    Secteur : Industrie

    Informations forums :
    Inscription : Août 2005
    Messages : 3 317
    Par défaut
    bonjour

    tu peux essayer


    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
    Dim ObjNoeud As Node
    Dim I As Byte, J As Byte, H As Byte, F As Byte, G As Byte
     
    With TreeView1
        'Noeud parent
        Set ObjNoeud = .Nodes.Add(, , "Niveau0", "Niveau0")
     
        For I = 1 To 2 ' Noeud enfant niveau 1
            Set ObjNoeud = .Nodes.Add("Niveau0", tvwChild, "Niveau1" & I, "Niveau1" & I)
     
            For J = 1 To 2 ' Noeud enfant niveau 2
                H = H + 1
                Set ObjNoeud = .Nodes.Add("Niveau1" & I, tvwChild, "Niveau2" & H, _
                "Niveau2" & I & J)
     
                For G = 1 To 2 ' Noeud enfant niveau 3
                    F = F + 1
                    Set ObjNoeud = .Nodes.Add("Niveau2" & H, tvwChild, "Niveau3" & F, _
                    "Niveau3" & I & J & G)
                Next G
     
            Next J
        Next I
    End With
     
    Set ObjNoeud = Nothing


    michel

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Juin 2006
    Messages
    105
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2006
    Messages : 105
    Par défaut
    Citation Envoyé par SilkyRoad
    bonjour

    tu peux essayer
    michel
    Rebonjour, j'ais trouvé, mais en fait je limite les possibilités de choix de
    l'utilisateur vu que un chiffre trop gd entrainerai un ramage dans le stockage
    memoire.


    Merci Michel j'ai adapté ton code

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [c#] Probleme d'événement sur TreeView
    Par gilles641 dans le forum Windows Forms
    Réponses: 2
    Dernier message: 08/06/2006, 16h56
  2. Réponses: 3
    Dernier message: 07/04/2003, 20h06
  3. Probleme sur le Fields des fichiers Xmlgram
    Par Sandrine75 dans le forum XMLRAD
    Réponses: 4
    Dernier message: 20/03/2003, 17h09
  4. Probleme sur un AppendChild
    Par Toxine77 dans le forum XMLRAD
    Réponses: 3
    Dernier message: 14/03/2003, 18h25
  5. Probleme sur les chaines de caractere
    Par scorpiwolf dans le forum C
    Réponses: 8
    Dernier message: 06/05/2002, 19h01

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo