Ver Mensaje Individual
  #1  
Antiguo 03-02-2006
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Reputación: 22
Caro Va por buen camino
Unhappy TreeView sacar Hijos

Hola a todos

Estoy desesperada nose como poder sacar todos los hijos de un determinado item donde yo hago click en un treeview

Digamos que tenemos este arbol

Código:
 
Abuelo1       
------Hijo1     
------Hijo2     
----------nieto1 
----------nieto2 
Abuelo2
------Hijo12
1. Si yo hago click en nieto1 no saca ningun hijo
2. Si yo hago click en hijo2 me sca como sus hijos nieto1 y nieto2
3. Si yo hago click en abuelo1 deberia sacarme Hijo1, Hijo2, nieto1 y nieto 2

Lo estube haciendo de la siguiente manera

Código Delphi [-]
 
var
   i:Integer;
   hijos:String;
begin
     hijos:='';
     IF arbol.Selected.HasChildren=TRUE THEN
     begin
         for i:=0 to arbol.Selected.Count-1 do
         begin
             hijos:=hijos+' > '+arbol.Selected.Item[i].Text;
         end;
         showmessage(hijos);
     end
     ELSE
         showmessage('El item no tiene hijos');
end;

Me funciona para el caso 1 y 2 pero para la 3 solo me saca Hijo1 e Hijo2 pero no los nietos y si deberian estar

Ayudenme por favor cualquier idea sera bienvenida, muchisimas gracias por adelantado
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.

Última edición por Caro fecha: 03-02-2006 a las 20:56:17.
Responder Con Cita