expandir un nivel al TreeView...
 

Hi!, unas pequeñas dudillas con respecto a este componente:

1) Cómo puedo expandir el treeview en un sólo nivel?, es decir, trae una propiedad de expand pero extande todos los nodos en todos los niveles, sólo quiero que expanda un sólo nivel (como esta en la imagen), aunque tengan subnodos, claro, esto es posible?, y como? (los nodos del treeview se añaden dinámicamente).



2) De un nodo seleccionado, puedo saber su `path` completo?, ¿cómo?.


De Antemano, Gracias!.

Hola,

Cada Item de un TreeNode cuenta con el método "Expand", el cual funciona más o menos así:

Código Delphi [-]
   procedure TForm1.Button1Click(Sender: TObject);
    var
      nodo: TTreeNode;
    begin
      nodo := TreeView1.Selected;
      nodo.Expand(true);
      //nodo.Collapse(true);
    end;

El parámetro (true, en este caso) sirve para que expanda completamente el Nodo o solamente un primer nivel del mismo. Nota que los Nodos también cuentan con el método "Collapse", el cual sirve para justamente lo contrario y hace uso del mismo parámetro, el cual tiene la misma utilidad que "Expand".

Respecto de la segunda cuestión (aunque conviene hacer en hilos distintos preguntas distintas) te diré que aunque lo he intentado grosso modo no doy con la tecla: seguramente el pandero lo cogerá alguien que lo sepa tañer mejor.

Segundo tema
 

Hola, la propiedad Parent del objeto TTreeNode hace referencia al nodo que lo contiene(de nivel inmediato superior) y la propiedad Level al nivel que se encuentra el mismo dentro del árbol, luego es fácil hacer un pequeña función que haga lo que pides

Código Delphi [-]

 Function PathDeNodo(Node : TTreeNode):String;
  Var
   S : String;
 begin
   S    := Node.Text;
   while Node.Level > 0 do
   begin
     Node := Node.Parent;
     S    := Node.Text + '\'+S;
   end;
   Result := S;
 end;

Espero sea lo que buscas.

Un salu2 a tod@s

Hi!, gracias por la ayuda, el programa para obtener el path funciona perfectamente!. Pero con lo de expandir un nivel sigo teniendo problemas, me expande todo a todos los niveles, sólo quiero expandir el item root un nivel como en la imagen, nota: el root no esta seleccionado.

Gracias!.

Me parece que omitiste esta parte:

// Saludos