Listbox1.ItemIndex := treeview1.Selected.AbsoluteIndex;
Résolu
Delphiturbo
Messages postés
68
Date d'inscription
mercredi 31 octobre 2007
Statut
Membre
Dernière intervention
29 juillet 2008
-
11 mai 2008 à 15:49
Delphiturbo Messages postés 68 Date d'inscription mercredi 31 octobre 2007 Statut Membre Dernière intervention 29 juillet 2008 - 11 mai 2008 à 22:57
Delphiturbo Messages postés 68 Date d'inscription mercredi 31 octobre 2007 Statut Membre Dernière intervention 29 juillet 2008 - 11 mai 2008 à 22:57
2 réponses
cs_Jean_Jean
Messages postés
615
Date d'inscription
dimanche 13 août 2006
Statut
Membre
Dernière intervention
13 décembre 2018
3
11 mai 2008 à 19:26
11 mai 2008 à 19:26
Je ne sais pas pourquoi, mon post précédent n'apparaît pas.
Je Je remets ma solution que je n'ai pas testée, mais comme tous les contrôles listes, il te faut chercher les éléments à rajouter:
For i:=0 to (treeview1.Items.Count-1) do
Begin
If treeview1.Items[i].text=listbox1.Items.Strings[listbox1.ItemIndex]
then Treeview1.Selected:=treeview1.Items[i];
End;
Bien à toi
Jean_Jean
Je Je remets ma solution que je n'ai pas testée, mais comme tous les contrôles listes, il te faut chercher les éléments à rajouter:
For i:=0 to (treeview1.Items.Count-1) do
Begin
If treeview1.Items[i].text=listbox1.Items.Strings[listbox1.ItemIndex]
then Treeview1.Selected:=treeview1.Items[i];
End;
Bien à toi
Jean_Jean
Delphiturbo
Messages postés
68
Date d'inscription
mercredi 31 octobre 2007
Statut
Membre
Dernière intervention
29 juillet 2008
11 mai 2008 à 22:57
11 mai 2008 à 22:57
merci bien
