以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]我在treeview中的数据是根据文件结构添加 treeview中 我右移树节点的时候 如果是文件 就不能移动 有没有可以在node移动前可以提前判断的呀  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=65741)

--  作者:a937775799
--  发布时间:2015/3/21 19:15:00
--  [求助]我在treeview中的数据是根据文件结构添加 treeview中 我右移树节点的时候 如果是文件 就不能移动 有没有可以在node移动前可以提前判断的呀
 我在treeview中的数据是根据文件结构添加 treeview中
我右移树节点的时候 如果是文件 就不能移动
有没有可以在node移动前可以提前判断的呀
我现在是这样实现,但是感觉好麻烦
    If FileSys.FileExists(temp_s)
        nd.MoveRight
        temp_n = Vars("projectFiles") + nd.FullPath
        Dim temp_f As  String  \'检测上级是不是文件
        temp_f = temp_n.SubString(   0   ,   temp_n.LastIndexOf("\\")  )
       
        MessageBox.Show("移动的目标:"+temp_s)
        MessageBox.Show("目标位置:"+temp_n)
        MessageBox.Show("截取后:"+temp_f)
        If FileSys.FileExists(temp_f) = False
            If temp_s<>temp_n
                FileSys.MoveFile(temp_s,temp_n)
            End If
        Else
        nd.MoveLeft
        End If
    End If
[此贴子已经被作者于2015/3/21 19:15:43编辑过]

--  作者:有点甜
--  发布时间:2015/3/22 11:08:00
--  
给你说一下思路:右移的时候,取得此节点的上一个节点,也就是 nd.Parent.Nodes(nd.Index-1),然后判断其是否为文件即可。
--  作者:a937775799
--  发布时间:2015/3/22 12:33:00
--  
 哦 是的哦  谢谢