PC SOFT

PROFESSIONAL NEWSGROUPS
WINDEV, WEBDEV and WINDEV Mobile

Home | Recent messages | Connect |  | English US
Home → WINDEV 2024 → Drag & Drop por programación
Drag & Drop por programación
Started by Javier, Mar., 09 2009 6:17 PM - No answer
#1
Posted on March, 09 2009 - 6:17 PM
Hola a tod@s.
Estoy intentando arrastar elementos de un treeview mediante drag&drop a un campo de ediciòn por programación, he declarado el control dndSource, el dndTarget y los eventos dndDragOver y dndDrop pero cuando suelto en el target no me añade nada.
En modo automático sí que funciona pero yo quiero controlar que sólo se puedan arrastar determinados elementos por eso uso el método de programación.
el código quedaría así:
//Inicialización del TreeView
TreeView..dndSource=dndProgram
//Inicialización del campo de edición
EDT_1..DndTarget=dndProgram
DnDEvent("RollOver","EDT_1",dndDragOver)
DnDEvent("OnDrop","EDT_1",dndDrop)
//Procecimiento RollOver
PROCEDURE RollOver()
IF TreeTypeItem(TreeView,TreeView[TreeView])=tvLeaf THEN
DnDCursor(dndCopy)
ELSE
DnDCursor(dndNone)
END
//Procedimiento OnDrop
PROCEDURE OnDrop()
DnDAccept(dndCopy)

//////////
Resultado arrastra pero cuando suelto no añade nada al campo de edición.
¿Alguien puede ayudarme?
Gracias
→ Go back to WINDEV 2024