Ordenar un TVirtualStringTree

[Casimiro Notevi]

¿Con ninguno de los 2 métodos?

[Angel.Matilla]

Empezado por Casimiro Notevi

¿Con ninguno de los 2 métodos?

Con ambos me da el mismo resultado de la imagen. Claro que como la Ayuda del TVT viene tan bien explicada no sé si el método hay que ponerlo antes o después del EndUpdate(), si como decía antes hace referencia a la columna que quiero ordenar o a la que sustenta a la misma...

[Casimiro Notevi]

Ni idea, la verdad, sólo he pedido un ejemplo a la "IA Bard" y me ha dicho esto:

#include <vcl.h>

class TForm1 : public TForm
{
public:
  TVirtualStringTree *Tree1;

  __fastcall TForm1(TComponent* Owner);
  void __fastcall FormCreate(TObject* Sender);
  void __fastcall SortTree(int Column);
  void __fastcall Tree1Sorted(TObject* Sender, TTreeNode* Node, bool& Continue);
};

__fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner)
{
  Tree1 = new TVirtualStringTree(this);
  Tree1->ColumnCount = 2;
  Tree1->Columns[0]->Caption = "Nombre";
  Tree1->Columns[1]->Caption = "Edad";

  Tree1->AddChild(NULL, "Juan", 20);
  Tree1->AddChild(NULL, "María", 25);
  Tree1->AddChild(NULL, "Pedro", 30);
}

void TForm1::FormCreate(TObject* Sender)
{
  SortTree(0);
}

void TForm1::SortTree(int Column)
{
  Tree1->Sort(Column, true);
}

void TForm1::Tree1Sorted(TObject* Sender, TTreeNode* Node, bool& Continue)
{
  if (Node->DataValue[0] < Node->Parent->DataValue[0])
    Continue = false;
}

int main()
{
  Application->Initialize();
  Application->CreateForm(__classid(TForm1), &Form1);
  Application->Run();
  return 0;
}

[Angel.Matilla]

Gracias por la ayuda. Por la respuesta que me das intuyo que si quiero ordenar la 1ª columna (índice 0) se ordenarían los nodos padre; como en este caso hay un padre y varios hijos, estos aparentemente no se ordenan. Probaré con lo que te han sugerido.