Ver Mensaje Individual
  #1  
Antiguo 11-01-2008
Avatar de walito
walito walito is offline
Miembro
 
Registrado: jun 2005
Posts: 121
Reputación: 19
walito Va por buen camino
TCheckTreeView y nodos

Buenas.

Tengo un problema que es un tontera pero me lleva 2 dias y no lo resuelvo.

En runtime lleno un TCheckTreeview:

+Padre1
|->Hijo1
|->Nieto1
|->Hijo2
|->Nieto1
|->Nieto2
+Padre2

Código Delphi [-]
nodoPadre := nodo.Add(nil, 'Padre1');
nodoHijo := nodo.AddChild(nodoPadre, 'Hijo1');
nodoNieto := nodo.AddChild(nodoHijo, 'Nieto1');

nodoHijo := nodo.AddChild(nodoPadre, 'Hijo2');
nodoNieto := nodo.AddChild(nodoHijo, 'Nieto1');
nodoNieto := nodo.AddChild(nodoHijo, 'Nieto2');


nodoPadre := nodo.Add(nil, 'Padre2');


Despues por codigo quiero checkear el Padre1->Hijo2->Nieto2.

Tengo la referencia de todos, los nodos hasta el checktreeview, pero no logro llegar al nodo padre.

Lo que estoy probando es asi:

Código Delphi [-]
showmessage(nodoHijo.Parent.Item[y].Text+' -> '+nodoHijo.Item[z].Text);

De esta forma llego desde atras para adelante hasta el nivel del medio osea el hijo, pero no puedo llegar al padre.

Que estoy haciendo mal?
Algun TIPs?

Gracias
Responder Con Cita