FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
OnDragdrop y OnDragOver
Muy buenas. Tengo un componente propio que deriva de la clase TCustomControl.
Lo que deseo es poder arrastrar y soltar un panel encima de este componente mío. El código mediante el cual he intentado esto es el siguiente:
Pero sin éxito. En mi formulario he asignado un trozo de código en ambos eventos pero ninguno llega a dispararse. He observado que dentro de la clase TMiNuevoComponente puedo acceder a dos propiedades (OnDragDrop y OnDragOver) pero no se de que me puede servir. Gracias. |
#2
|
||||
|
||||
¿Qué código usas para disparar esos eventos?
|
#4
|
||||
|
||||
Me lo temía. Lo que tienes que hacer es sobrecargar (OVERRIDE) varios métodos de la clase TCustomControl. No sé exactamente cuales, pero serían los que tengan nombres con "Drag" y/o "Drop". Por ejemplo, DoDragMsg, aunque no estoy seguro del todo. Nunca he usado drag'n'drop así que no sabría decirte.
|
#5
|
||||
|
||||
Pero en realidad no necesita nada de eso, o al menos eso creo. TCustomControl ya tiene todo para manejar el drag & drop, así que lo único que debe hacer es codificar los eventos OnDragDrop, OnDragOver. Aquí puede ver una explicación general de su uso.
LineComment Saludos |
#6
|
|||
|
|||
Acabo de volver de vacaciones así que pido disculpas por contestar tan tarde.
primero, muchas gracias por las respuestas pero sigo sin encontrar solución. Pero tengo pregunta-pista, a ver si va por aquí la solución. He observado que puedo arrastrar y soltar el panel encima de otros panels. Al mismo tiempo, he podido observar que el panel NO lo puedo arrastrar encima de los objetos del tipo TSpeedButton. Sabe alguien el motivo? Gracias. |
#7
|
||||
|
||||
Cita:
|
#8
|
||||
|
||||
Hola.
Los eventos OnDragDrop y OnDragOver estan declarados en la seccion protected de la clase TControl de la que deriva TSpeedButton, para usarlos tendrías que desproteger la clase TSpeedButton. Un ejemplo:
Saludos
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#9
|
|||
|
|||
@AgustinOrtu
Aquí está el problema, que no sabía codificar el comportamiento de los dos eventos. Gracias por responder . @Ecfisa genial tu respuesta, es la solución ! Mil gracias. Pero ya que estoy, debo reconocer que no me explico como es que funciona. A ver, según dices, los dos eventos están declarados como protected en la clase TControl. después de esta línea:
que pasa con la nueva clase TSpeedButton ? Los dos eventos dejan de ser protected? Puedes desarrolar un poco tu respuesta? Seguro que me resultará más que interesante y útil. Gracias. |
#10
|
||||
|
||||
Cita:
Notarás que hay una pequeña diferencia entre el artículo y el ejemplo anterior , tomando el artículo quedaría:
También te podría resultar interesante este enlace: Clases interpuestas Saludos
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#11
|
|||
|
|||
excelentes recursos, muchas gracias.
|
Herramientas | Buscar en Tema |
Desplegado | |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
uso de OnDragOver y OnGragDrop, en un TreeView | spyfenix | OOP | 2 | 16-11-2007 20:10:34 |
|