Discussion :

[rasmus]

Bonjour,

J'ai une question hyper basique mais en l'absence de documentation complète du composant Ttreeview, je sèche lamentablement.
Je cherche comment sélectionner un item dans l'arborescence d'un treeview (comme quand on clique dessus à la souris)

PS: Sur le net j'ai trouvé comment ajouter / supprimer des items mais pas comment sélectionner un item donné.
RePS: Auriez-vous un livre à me conseiller pour trouver la doc des composant de la LCL?

Merci, Ras'

[BeanzMaster]

Bonjour

Tu as la propriété "Selected" qui est de type TTreeNode dans TTreeview

Exemple de Selection en recherchant le text d'un item

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
 
procedure TForm1.SelectNode(aText: string);
var
  n: TTreeNode;
begin
  if (aText <> '') then 
  begin
    aText:=LowerCase(aText);
    for n in TreeView.Items do
    begin
      if (LowerCase(n.Text) = aText) then 
      begin
         TreeView.Selected:=n;
         Break;
      end;
    end;
  end;
end;

a+

[rasmus]

OK, merci mais je cherche plutot à sélectionner un item en fonction de son N° , voir à pointer sur la racine tu Treeview...
Merci

[BeanzMaster]

OK, merci mais je cherche plutot à sélectionner un item en fonction de son N° , voir à pointer sur la racine tu Treeview...
Merci

Salut,

TTreeView.Items[monIndex].Selected := TruePour ce qui est de la racine du trreview c'est le Items Sinon si tu veux un noeud "racine" perso. Il faut le créer, puis créér tes noeuds enfants dedans cf : http://wiki.lazarus.freepascal.org/T...n_de_TTreeview

A+