|
No entiendo lo que dices del Paint. Si te refieres al programa de dibujo que se incluye en Windows pues no veo nada ahí que pueda arrastrarse.
En todo caso, para arrastrar componentes durante la ejecución básicamente puedes hacer esto:
1. Pon la propiedad DragMode de la componente que se arrastra en dmAutomatic.
2. En la componente de "atterizaje" debes manejar los eventos OnDragOver y OnDragDrop. En OnDragOver usas el parámetro Source para asegurarte que el objeto que se está arrastrando sobre ella es la componente que quieres y con base en ello asignas el valor del parámetro Accept (true si aceptas que puede soltarse ahí el objeto, false en caso contrario).
En el evento OnDragDrop haces lo que tengas que hacer cuando se suelte el objeto. Nuevamente el parámetro Source te indica cuál fue este objeto. Los parámetros X, Y te dan las coordenadas donde se "suelta" el objeto. Entrecomillo "suelta" porque tú misma debes hacer la traslación del objeto asignando las propiedades Left y Top y posiblemente asignando a la propiedad Parent el objeto sobre el cual soltaste la componente.
// Saludos
|
21-10-2004
Modo Hilado