Hello,
Dans un TTree, je cherche à personnaliser mon drag&drop. Concrètement je veux empêcher l'utilisateur de dropper à certains endroits, et j'aimerais modifier le niveau où l'élément est droppé.
Exemple :
1 2 3 4 5 6 7 8
|
*
|- node1
|- node2
|- node 2-1
|- node 2-2
|- node3
|- node 3-1 |
L'utilisateur sélectionne le node 3-1 et le drop sur le node 2-2, et bien j'aimerais que le node 3-1 se mette au même niveau que node1, 2 et 3.
Pour faire tout cela, j'essaie d'utiliser la propriété OnDragDrop, mais je ne parviens pas à faire des tests sur l'endroit où je drop mon noeud, puisque dans la fonction générée, le Sender et la Source sont des TTree avec lesquels je ne peux pas travailler pour avoir des informations plus précises.
procedure treeMainDragDrop (Sender, Source: TObject; X, Y: Integer) ;
Mon problème est-il assez clair ?
Partager