- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助] 窗口目录树如何获得更改前的目录路径 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=25630)
-- 发布时间：2012/11/13 15:22:00
-- [求助] 窗口目录树如何获得更改前的目录路径
在目录树的AfterEditNode事件中，e.Node.FullPath可以获得更改后标题的路径，那要什么代码才能获得此标题更改前的路径呢。
或者更全面一些，我用一个目录树窗口用来设置客户的分类，在目录树编辑以后，怎样让被更改节点下的客户分类路径自动变为新的路径。（如图）
在此先谢过
此主题相关图片如下：qq截图20121113152105.jpg
-- 发布时间：2012/11/13 15:26:00
--
这个就简单了吧。
nd是你选中的节点。然后写入代码。
nd.DataRow("分类路径") = nd.fullpath
[此贴子已经被作者于2012-11-13 15:26:40编辑过]
-- 发布时间：2012/11/13 15:33:00
-- 我的客户分类是存在另一张表中的，客户表中的分类路径只是调用目录树的FullPath
我的客户分类是存在另一张表中的，客户表中的分类路径只是调用目录树的FullPath
-- 发布时间：2012/11/13 15:39:00
--
以下是引用zhicheng在2012-11-13 15:33:00的发言：
我的客户分类是存在另一张表中的，客户表中的分类路径只是调用目录树的FullPath
我的客户分类是存在另一张表中的，客户表中的分类路径只是调用目录树的FullPath
先要弄清楚，原来你是怎样把表中的路径填入的？
-- 发布时间：2012/11/13 15:49:00
--
在客户新增的窗口中点击主分类，打开窗口：客户主分类选择，然后在客户主分类选择窗口中的目录树NodeMouseClick 事件上写
Dim a As String = e.node.FullPath
Dim b As String = e.Node.Text
Tables("客户表").current("主分类") = b
Tables("客户表").current("分类路径") = a
Forms("客户主分类选择").Close
此主题相关图片如下：2.jpg
[此贴子已经被作者于2012-11-13 15:49:48编辑过]
-- 发布时间：2012/11/13 15:57:00
--
取得修改前的路径
e.node.FullPath
取得修改后的路径
e.node.text = e.newtext
e.node.FullPath
然后，去查找表格中是这个路径所在的行。DataTables().find或者DataTables().Select
[此贴子已经被作者于2012-11-13 16:10:43编辑过]
-- 发布时间：2012/11/13 16:06:00
--
您这个是获得标题吧？
-- 发布时间：2012/11/13 16:11:00
--
您这个是获得标题吧？ |
-- 发布时间：2012/11/13 16:11:00
--
写错了，改回来了。
-- 发布时间：2012/11/13 16:17:00
--
如果，你的树设置时name和text是一致的，旧值就是node.name