salut tout le monde
j'ai une bd duquelle je veut charge une table contenant
des categories avec leurs images
le schema de la table est :
{IdCategorie, IdCategorieParent, TextCategorie, CheminImage}
et jai procédé ainsi
1 ) je charge mes images dans un ImagList
et pour charger les noeuds j'ai fait :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Private Sub ChargerImages() For Each dr As DataRow In datatable_Categories.Rows If dr("ImageCategorie") <> "" And IO.File.Exists(dr("ImageCategorie")) Then Me.ImgList.Images.Add("Img_" & dr("IdCategorie"), Image.FromFileCheminImg)) End If Next End Sub
alors je suis confronté à 2 pb
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 For Each dr As DataRow In datatable_Categories.Rows Dim Idx As Integer = Me.TV_Categories.TopNode.Nodes.IndexOfKey("Node_" & ("IdCategorieParent") 'Je cherche la cle du node parent à partir des nodes du level=1 'car j'ai créer un node 'Catégories' comme racine pour les autres catégories Dim node As New TreeNode(Text) node.Name = "Node_" & dr("IdCategorie") If Me.ImgList.Images.IndexOfKey("Img_" & dr("IdCategorie")) > 0 Then node.ImageKey = "Img_" & IdCategorie Else node.ImageKey = "" End If node.StateImageKey = "" node.SelectedImageKey = "" If Idx < 0 Then 'Existe pas Me.TV_Categories.TopNode.Nodes.Add(node) Else Me.TV_Categories.TopNode.Nodes(Idx).Nodes.Add(node) End If Next
1) c'est que je ne sais pas dynamiser le chargement de plusieurs niveau (level>2)
parce que pour la recherche d'un node j'ai fait
Me.TV_Categories.TopNode.Nodes.IndexOfKey(cle)
or pour une catégorie je sais seulement son parent et son id
2) les nodes prennent automatiquement la premiere image de mon imageList
meme si j'ai fait (node.ImageKey = "") et cest ce que je ne veut pas
je veus seulement affecter pour chaque catégorie l'image équivalente
j'espère que j'ai été clair
merci de me venir en aide
Partager