Foxtable(狐表)用户栏目专家坐堂 → [求助]目录树对应的daterow行不正确


  共有2496人关注过本帖树形打印复制链接

主题:[求助]目录树对应的daterow行不正确

帅哥哟,离线,有人找我吗?
moseser
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:622 积分:5303 威望:0 精华:0 注册:2022/4/4 14:42:00
[求助]目录树对应的daterow行不正确  发帖心情 Post By:2023/11/21 18:23:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看
图1 为 生成目录树的表,
Dim str As String = e.Sender.Value
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim filter As String = "[目录方案] = '" & str & "' "
trv.BuildTree("目录方案", "一级目录|二级目录", filter , "顺序号,编码")
trv.ExpandAll

e.Form.Controls("TreeView1").ContextStrip = e.Form.Strips("sp")

图2 为生成的目录树

在目录树 的click事件中编写如下代码

Dim nd As WinForm.TreeNode = e.Sender.SelectedNode
Dim dr1 As DataRow = nd.DataRow

Dim p As Integer = Tables("目录方案").FindRow(dr1)
Tables("目录方案").Position = p


问题:
当选择一级节点 钢筋时, tables("目录方案")应该是 绿色箭头指示的行,而实际则是 红色箭头指示的行

也是就是 Dim dr1 As DataRow = nd.DataRow  生成节点的数据行没有找对,
请问是什么原因?
图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
moseser
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:622 积分:5303 威望:0 精华:0 注册:2022/4/4 14:42:00
  发帖心情 Post By:2023/11/21 18:25:00 [只看该作者]

补图
图片点击可在新窗口打开查看此主题相关图片如下:3.png
图片点击可在新窗口打开查看

 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110509 积分:562429 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/11/21 20:14:00 [只看该作者]

我测试没有问题,请上传实例说明

 回到顶部
帅哥哟,离线,有人找我吗?
moseser
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:622 积分:5303 威望:0 精华:0 注册:2022/4/4 14:42:00
回复:(有点蓝)我测试没有问题,请上传实例说明  发帖心情 Post By:2023/11/22 8:16:00 [只看该作者]

实例如下
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb


 回到顶部
帅哥哟,离线,有人找我吗?
moseser
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:622 积分:5303 威望:0 精华:0 注册:2022/4/4 14:42:00
回复:(moseser)回复:(有点蓝)我测试没有问题,请...  发帖心情 Post By:2023/11/22 8:18:00 [只看该作者]

在选择  主体 、装修 一级目录时,有问题

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110509 积分:562429 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/11/22 8:33:00 [只看该作者]

排序列有重复的数据导致的,使用不重复的序号即可


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
moseser
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:622 积分:5303 威望:0 精华:0 注册:2022/4/4 14:42:00
回复:(有点蓝)排序列有重复的数据导致的,使用不重...  发帖心情 Post By:2023/11/22 13:11:00 [只看该作者]

我是根据序号生成编号的,比如  一级目录的序号,就自动转成编号,二级目录 序号 也是从1 开始排,然后找到一级目录的序号n ,然后生成编号 n.1


 回到顶部
帅哥,在线噢!
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110509 积分:562429 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/11/22 13:50:00 [只看该作者]

那就另外再增加一个排序列,总之BuildTree里的排序列不能有重复值。或者不要在BuildTree使用这个排序列

 回到顶部