100分,火急求TreeView节点移动的方法.(100)

  • 主题发起人 zpselect
  • 开始时间
Z

zpselect

Unregistered / Unconfirmed
GUEST, unregistred user!
树点结构如下: ROOT +11111 1111-1 1111-2 1111-3 +22222 2222-1 2222-2一:用鼠标对TreeVie操作,要实现的要求如下功能:1:1111-1移到1111-2之后(同级移动,),也可以将1111-3移到1111-1之前2:1111-2 移到22222节点之内,作为其子节点。二:两个按钮,即:上移,下移,点击上移即:节点之间平级上移动,点击下移即:节点之间平级下移动
 
http://www.cnblogs.com/del/archive/2008/03/13/1104035.html应该可以解决你的问题,上面说的很清楚自己研究一下
 
这个好简单,你就是响应 DragOver EndDrag两个事件设定treeview 为ET1,全局变量 Tq:treenode;dragover 是让你知道拖动后的位置;停靠点是在那 tq:=et1.GetNodeAt(x,y) ; enddrag 是让你知道选择的是那点 ,拖动结束! (et1.Selected).parent:=tq;ok;就完成了
 
TO:qq112729650首先谢谢你给的例子,你给例子存在一定的缺陷,即: ROOT +11111 1111-1 1111-2 1111-3 将1111-1拖动置1111-2处,则无法进行Insert操作.
 
采用我的方法吧 我已经实现
 
你的方法是将源节点加到目标节点中作为子节点.呵呵,我通过别的方法实现了.
 
....treeview的节点不是有个MoveTo的方法吗?
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
742
DelphiTeacher的专栏
D
S
回复
0
查看
647
SUNSTONE的Delphi笔记
S
S
回复
0
查看
659
SUNSTONE的Delphi笔记
S
顶部