Padre de un nodo en VirtualTreeView

[Angel.Matilla]

Tengo un formulario con un VTV que cargo a partir de un query así:

AnsiString cAux;
PTreeEle DatEle;
PVirtualNode Nodo1, Nodo2;

Mesas->NodeDataSize =  sizeof(TTreeElec);
Mesas->BeginUpdate();
Mesas->Clear();

cAux = "";
for (; !Query->Eof; Query->Next())
{
     if (cAux != Query->FieldByName("Nombre")->AsString)
     {
          Nodo1             = Mesas->AddChild(NULL);
          DatEle            = (PTreeEle)Mesas->GetNodeData(Nodo1);
          DatEle->Municipio = Query->FieldByName("Nombre")->AsString;
          cAux              = Query->FieldByName("Nombre")->AsString;
     }

     Nodo2             = Mesas->AddChild(Nodo1);
     DatEle            = (PTreeEle)Mesas->GetNodeData(Nodo2);
     DatEle->Municipio = FormatFloat("000 ", Query->FieldByName("Distrito")->AsInteger) +
                         FormatFloat("000 ", Query->FieldByName("Seccion")->AsInteger) +
                         Query->FieldByName("Mesa")->AsString;;
     DatEle->Votos     = Query->FieldByName("Votos")->AsInteger;
     DatEle->Codigo    = Query->FieldByName("Codigo")->AsInteger;
}
Mesas->EndUpdate();

Pero cuando he seleccionado un nodo hijo, ¿cómo hago para averiguar el valor del nodo padre? He estado mirando por el foro y no me aclaro con las respuestas que he visto.

[Casimiro Noteví]

Creo que con GetPreviousLevel

[Angel.Matilla]

Empezado por Casimiro Notevi

Creo que con GetPreviousLevel

PTreeEle tDato;
tDato = (PTreeEle)Mesas->GetPreviousLevel(Mesas->FocusedNode);

No. Me dice que 'GetPreviousLevel' is not a member of 'TVirtualStringTree'.
He estado mirando por otros lados, evidentemente, y encontré esta estructura:

PTreeEle tDato;
tDato = (PTreeEle)Mesas->GetNodeData(Mesas->FocusedNode->Parent);

¡Y al final es la que me ha dado la solución! ¡Después de una mañana chocando con el problema!

[Casimiro Noteví]

Empezado por Angel.Matilla

Me dice que 'GetPreviousLevel' is not a member of 'TVirtualStringTree'.

¿Pero no era un VirtualTreeView?

[Angel.Matilla]

Empezado por Casimiro Notevi

¿Pero no era un VirtualTreeView?

Sí, pero es el mensaje de error que me da el compilador.