var i: integer; begin with TreeView1 do for i := 0 to Items.Count - 1 do Items[i].Collapse(True); end;
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionvar NewNode: TTreeNode; begin with TreeView1 do begin NewNode := Items.AddChild(Selected, 'Nouveau noeud'); Selected.Expand(True); NewNode.Focused := True; NewNode.Selected := True; end ; end;