以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]折叠表不触发DataColChanged事件  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=178047)

--  作者:昱飞哥
--  发布时间:2022/6/15 22:18:00
--  [求助]折叠表不触发DataColChanged事件
图片点击可在新窗口打开查看

如图所示的折叠表,我在表A的DataColChanged事件中代码如下:
Select Case e.DataCol.Name
    Case "父ID"
        If e.DataRow.IsNull("父ID") = False Then
            \'当父ID变化时,自动维护当前行的层级
            Dim index As Integer = Tables(e.DataTable.Name).FindRow(e.DataRow) \'查找修改的单元格所在的row的行号
             Dim current As Row = Tables(e.DataTable.Name).Rows(index)
            If Tables(e.DataTable.Name).GridTreeVisible = False Then \'如果没有开启折叠模式,则开启。因为只有开启折叠模式之后才能获取正确的层级
                Tables(e.DataTable.Name).ShowGridTree
            End If
            Current("层级") = Current.Hierarchy
        End If
End Select

发现问题:当通过"左移""右移"当前节点时,父ID虽然是会自动维护而变化,但是父ID变化却不会触发上述代码。不知道算不算bug
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:自动维护层级.foxdb



--  作者:有点蓝
--  发布时间:2022/6/16 8:47:00
--  
我反馈一下
--  作者:有点酸
--  发布时间:2022/6/20 8:38:00
--  
升级到2022.6.22,然后参考:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:自动维护层级.foxdb



[此贴子已经被作者于2022/6/20 8:43:57编辑过]