Procesar VirtaulStringTree

[Angel.Matilla]

Sigo a vueltas con este elemento. Me parece estupendo, pero me está costando verdaderos sudores trabajar con él. Siguiendo con el mismo "bicho" de mi anterior hilo, tengo este árbol:

Para procesar los nodos seleccionados uso este código para rellenar un TListView de otro formulario:

TListItem *pItem;
PVirtualNode Nodo1, Nodo2;
Nodo1 = Mesas->GetFirst();
while (Nodo1 != NULL)
{
     if (Mesas->CheckState[Nodo1] > csUncheckedPressed)
     {
          Nodo2 = Mesas->GetNext(Nodo1);
          while (Nodo2 != NULL && Nodo2->Parent == Nodo1)
          {
               if (Mesas->CheckState[Nodo2] > csUncheckedPressed)
               {
                    pItem = fEscrutinio->LisMesas->Items->Add();
                    pItem->Caption = ((PTreeEle)Mesas->GetNodeData(Nodo1))->Municipio;
                    pItem->SubItems->Add(((PTreeEle)Mesas->GetNodeData(Nodo2))->Municipio);
                    pItem->SubItems->Add(FormatFloat("#,###", ((PTreeEle)Mesas->GetNodeData(Nodo2))->Censo));
                    pItem->SubItems->Add(FormatFloat("#,###", ((PTreeEle)Mesas->GetNodeData(Nodo2))->Votos));
                    pItem->SubItems->Add(((PTreeEle)Mesas->GetNodeData(Nodo2))->CodMes);
               }
               Nodo2 = Mesas->GetNextSibling(Nodo2);
          }
     }
     Nodo1 = Mesas->GetNextSibling(Nodo1);
}

Tal cual está el código al pasar el primer nodo (ABENOJAR) se mete por el if, pero si el nodo no está desplegado el segundo if se lo salta, y en este caso estarían marcados todos los nodos de niveles inferiores. He intentado desplegar el nodo con Mesas->Expanded[Nodo1] = true antes de asignar Nodo2, pero al hacerlo se desmarca todo el nodo. ¿Podéis ayudarme o darme una pista de por donde debo tirar?

[Casimiro Noteví]

Aquí tienes ejemplos de virtualtreeview que pueden servirte, aunque es object pascal, no c++

[Angel.Matilla]

Empezado por Casimiro Notevi

Aquí tienes ejemplos de virtualtreeview que pueden servirte, aunque es object pascal, no c++

Muchas gracias. Ahora mismo lo estudio.

[Angel.Matilla]

Estuve viendo el código del enlace. Muy interesante. Probándolo me he dado cuenta de una cosa: una vez que el nodo se ha expandido el bucle qe puse en mi mensaje funciona a la perfección aunque luego se contraigan todos los nodos; es como si hasta que no se expande totalmente no supiera lo que hay. Lo que no encuentro es como expandir todo el árbol; sé que lo hice pero no recuerdo como.

[Angel.Matilla]

¡NO HE DICHO NADA! Me estaba empeñando en poner ExpandFull cuando el procedimiento es justo al revés: FullExpand.

[Casimiro Noteví]

vstArbol.FullExpand;
vstArbol.FullCollapse;

[Angel.Matilla]

Empezado por Casimiro Notevi

vstArbol.FullExpand;
vstArbol.FullCollapse;

Gracias. Y ya he comprobado que si una vez cargado el árbol se ejecutan ambos al procesar los nodos lo hace bien.