以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  ShowGridTree(层级)分级数据 与 甘特图 同步  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=174283)

--  作者:水墨青花
--  发布时间:2022/1/9 18:53:00
--  ShowGridTree(层级)分级数据 与 甘特图 同步
老师,

当使用层级数据时,甘特图如何能跟着 层级点的折叠与非折叠(即子节点行的可见与不可见)同步呢?

我在AddGanttRows的自定义函数中,添加了如下标黄代码,但是只能load,filter or sort 后才能调用AddGanttRows函数,
当点击层级(折叠与非折叠)时,该如何调用自定义函数,使甘特图同步变化呢?

Dim tbl As DataTable = DataTables("项目_Table2")
tbl.StopRedraw
tbl.DataRows.Clear()
For i As Integer = 0 To Tables("项目").Rows.Count -1 
    If Tables("项目").GridTreeVisible AndAlso Tables("项目").Rows(i).Visible Then
        tbl.AddNew()
    End If
Next
tbl.Save()
tbl.ResumeRedraw

--  作者:有点蓝
--  发布时间:2022/1/9 20:35:00
--  
做个例子发上来测试一下
--  作者:水墨青花
--  发布时间:2022/1/9 20:47:00
--  
其实,就是当 click 项目表 的 “+” 或 “-”时,是否可以有个触发函数,就可以同步相应的甘特图。

类似 AfterExpandNode, 或者 AfterCloseNode 之类的函数可以调用。



--  作者:有点蓝
--  发布时间:2022/1/9 20:48:00
--  
目前没有这种事件
--  作者:水墨青花
--  发布时间:2022/1/9 20:56:00
--  
那是否可以判断 如果该行是父行,其状态是 “+” 还是 “-”吗?
--  作者:有点蓝
--  发布时间:2022/1/9 21:09:00
--  
http://www.foxtable.com/webhelp/topics/3386.htm