Foxtable(狐表)用户栏目专家坐堂 → 定位树节点问题


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

主题:定位树节点问题

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
定位树节点问题  发帖心情 Post By:2015/4/1 20:46:00 [显示全部帖子]

请教老师:
  如截图所示,现能在点击树节点后,表自动定位到相应记录。有没有办法在表中选择不同记录后,也将树节点定位到相应节点上?

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2015/4/1 20:48:00 [显示全部帖子]

图没有传上去图片点击可在新窗口打开查看

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2015/4/1 20:55:00 [显示全部帖子]

老师:
  循环节点会不会引发节点的AfterSelectNode事件,因为我在节点的AfterSelectNode事件中有如下代码:
'部门管理_TreeView1_AfterSelectNode
'选择节点后执行
If e.Node.FullName <> "所有部门" Then
    Dim a As String = e.Form.Controls("借用标签").text & Replace(e.Node.FullName,"\",".")
    Dim dr As DataRow
    dr = DataTables("部门表").Find("[部门编号] = '" & a & "'")
    If dr IsNot Nothing Then
        Dim wz As Integer = Tables("部门表").FindRow(dr)
        If wz >= 0 Then
            Tables("部门表").Position = wz
        End If
    End If
Else
    Tables("部门表").Position = 0
End If

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2015/4/1 20:57:00 [显示全部帖子]

图片传不上去,再试一下

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


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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2015/4/1 21:02:00 [显示全部帖子]

老师:
  麻烦看一下我的 AfterSelectNode事件代码有没有什么问题。目的是选定节点后定位到表中相应记录上。

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2015/4/1 21:11:00 [显示全部帖子]

老师:
  在树新了节点后,在窗体没有重新打开时,引用新增节点 e.Node.DataRow 会出错

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2015/4/1 21:21:00 [显示全部帖子]

谢谢老师,明白了,我再试试看能不能定位节点

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2015/4/1 21:50:00 [显示全部帖子]

老师:可以定位节点了,请问有什么办法在节点定位后出现背景色,而原节点失去背景色 ?

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2015/4/1 21:59:00 [显示全部帖子]

是自动失去背景颜色,但定位的节点没有出现背景色,看不出来定在什么地方了,不知怎么处理 ?

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


加好友 发短信
等级:四尾狐 帖子:995 积分:6712 威望:0 精华:0 注册:2015/1/12 22:12:00
  发帖心情 Post By:2015/4/1 22:18:00 [显示全部帖子]

老师:

 加 trv.Select 后可以出现节点背景色。

但我在试验时发现一个奇怪的问题:

1.当在表中用上、下箭头移动记录时,节点背景色也在自动跟着变,正常。


2.当在表中用鼠标单击不同的记录时,节点背景色是变一次,停一次,再变一次,再停一次,依次循环,不知道问题出在什么地方了 ?


 回到顶部
总数 13 1 2 下一页