ENTRY OnDrop (IN INT _refID)
IF %IsDragData(0, _CF_TEXT) THEN
TEXT _dndText
; getting a text
_dndText := %GetDragDataText(0)
; finding out a position in the tree
_tmp := %HI_TVQueryDnDItem(_refId,_node1,_node2)
; setting a new item in the tree
CALL AddTreeItem(_refId, _dndText, _node1, _node2)
ENDIF
END OnDrop
0 komentárov