¿Cómo expandir automáticamente todos los nodos TTreeView?

Question

Quiero expandir el árbol en el formulario principal cuando se inicia la aplicación. ¿Cómo puedo hacerlo? No puedo encontrar la propiedad correspondiente. C++ Builder 2009.

Answer 1

Simplemente necesita llamar al FullExpand() en la vista de árbol.

Answer 2

Al añadir NodoArbol hacer su propiedad ampliado a cierto

se encuentra una propiedad para el objeto TreeNode, yo puso cierto antes de añadir a la lista de nodos.

y también se puede encontrar un método para la vista de árbol llamada ExpandAll

de mi parte

---

probar este código

//this will expand all nodes of Level and their parents 
procedure ExpandTree(Tree: TTreeView; Level: integer); 

    procedure ExpandParents(Node: TTreeNode); 
    var 
    aNode : TTreeNode; 
    begin 
    aNode := Node.Parent; 
    while aNode <> nil do begin 
     if not aNode.Expanded then 
     aNode.Expand(false); 
     aNode := aNode.Parent; 
    end; 
    end; 

var 
    aNode : TTreeNode; 
begin 
    if Tree.Items.Count > 0 then begin 
    aNode := Tree.Items[0]; 

    while aNode <> nil do begin 
     if aNode.Level = Level then begin 
     aNode.Expand(false); 
     ExpandParents(aNode); 
     end; 
     aNode := aNode.GetNext; 
    end; 
    end; 
end; 

//this will expand the Node and it's parents 
procedure ExpandNode(Node: TTreeNode); 
var 
    aNode : TTreeNode; 
begin 
    Node.Expand(false); 

    aNode := Node.Parent; 
    while aNode <> nil do begin 
    if not aNode.Expanded then 
     aNode.Expand(false); 
    aNode := aNode.Parent; 
    end; 
end; 

y ver la referencia http://www.delphipages.com/forum/showthread.php?t=159148

Mi Saludos

Answer 3

Existen varias maneras de hacerlo. La forma más fácil sería

TreeView1.FullExpand; 

como en la respuesta aceptada - Como alternativa

if TreeView1.items.GetFirstNode <> nil then 
    TreeView1.items.GetFirstNode.Expand(True); 

o

if TreeView1.items[0] <> nil then 
    TreeView1.items[0].Expand(True); 

El Expandir método en un TTreeNode es útil si desea ampliar completamente de una determinada nodo que no es el nodo raíz.