Hola a todos,
Utilizo el componente JvDBTreeView de las JEDIS para mostrar una estructura de árbol almacenada en una BBDD. Y por defecto las funciones de drag and drop modifican la estructura del árbol, cambiando automáticamente los indices padre del nodo que se esta arrastrando.
Y pretendo añadirle un nuevo modo de funcionamiento, de tal forma que al mover un nodo, en vez de asignarle el padre, lo que haga sea cambiarle el orden en el arbol.
El problema me lo encuentro en que necesito poder detener la operación de drag and drop para que no retorne el control al componente y este automáticamente me cambie el padre del nodo.
La idea es la siguiente
Código Delphi
[-]
procedure TForm2.JvDBTreeView1DragDrop(Sender, Source: TObject; X, Y: Integer);
begin
if DragMode = dmSort then begin
SortNodo;
CancelDragAndDrop;
end;
end;
Hasta ahora lo he conseguido lanzando una excepcion dentro del procedimiento
CancelDragAndDrop, pero no es elegante ni queda bien.
Alguna idea de como hacer esto.