DragDrop de un ListBox a otro??

[carrrlos]

Buenos días compañeros del foro,

En una aplicación, necesito arrastrar el elemento de un ListBox y soltarlo en otro ListBox, sé que se realiza mediante los eventos DragDrop y DragOver pero despues de experimentar con ellos no he conseguido implementarlo y por otro lado no se a que evento tengo que asociar el código que se ejecuta cuando se suelta el elemento arrastrado sobre el segundo ListBox.

Si alguien lo tiene implementado o sabe como se realiza, agradecería mucho un ejemplo de código o unas recomendaciones de como hacerlo.

Muchas Gracias.

[Neftali [Germán.Estévez]]

Pues en Delphi ya tienes casi el ejemplo completo.
Puedes añadir un nuevo formulario a tu proyecto desde:

File//New//Other//Forms//DualListBox (opción Copy Seleccionada)

Este formulario incluye dos listas con la posibilidad ya programada de pasar de una a otra (utilizando botones); Con alguna línea de código más ya tienes lo que necesitas.
He añadido ese formulario a un proyecto y he cambiado un par de cosillas para que admita mover con el ratón.


Te subo el ejempo y lo subo al FTP público (http://www.terawiki.clubdelphi.com/).

[carrrlos]

Muchas gracias,

El código me es de gran ayuda y desconocía la existencia de ese ejemplo en delphi.

Voy a ponerme ahora mismo con ello.

Saludos desde Madrid.