Hola a todos. He hecho un form con dos
TTreeView, a modo de la ventana habitual "
dual list box", en la que se permite pasar elementos de un
TTreeView a la otra, en cualquier sentido. El
TTreeView de la izquierda representa el conjunto de elementos disponibles y el de la derecha el de los elementos seleccionados. Se puede mover elementos de varias maneras:
drag&drop, doble clic y mediante los botones conocidos de "<", "<<", ">", ">>". Los
TTreeView son de 2 niveles.
Me va todo bien, salvo que si paso un elemento a otro, y luego lo regreso al árbol primero, aparece en el
último lugar del
TTreeView. Los nodos del árbol están ordenados alfabéticamente mediante la propiedad
ShortType=stText, pero no hace la ordenación cuando inserto un nodo en él.
Código Delphi
[-]
vNdo := tv2.Items.AddObject(nil, ndo.Text, ndo.Data);
Quisiera que el árbol se reordenara pero no lo hace y tampoco sé cómo hacerlo. ¿Alguna idea?
Muchas gracías.