Foros Club Delphi - Problema Drag-Drop evento doble

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- C++ Builder (https://www.clubdelphi.com/foros/forumdisplay.php?f=13)

- - Problema Drag-Drop evento doble (https://www.clubdelphi.com/foros/showthread.php?t=70530)

Problema Drag-Drop evento doble

Muy buenas. Estoy con un pequeño problemilla que no consigo solucionar. Tengo un TTreeView del que quiero que el usuario haga Drag-Drop en un objeto personalizado llamado THexEditor...

El DragMode del TreeView lo tengo manual, cuando pulsa encima de un elemento comienzo el BeginDrag... lo hace todo hasta aquí ok

el problema lo tengo en el momento del drop... hago comprobación de tipos, casting, todo ok... pero me duplica el evento, es decir, me hace drop 2 veces seguidas

si pongo un MessageDialog en el evento (por ejemplo "¿seguro que desea soltar aquí?") me preguntará dos veces seguidas...

He revisado todo el código pero no encuentro el problema ¿alguien sabe algo al respecto?

gracias!

¡solucionado!

en el evento DragOver puse la condición:

Código:

if(State == dsDragLeave ){

 ...codigo...

}

así el evento sólo salta una vez, cuando el usuario
suelta el item en el contenedor

un saludo