以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  求助:目录树怎么选择上一级  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=151625)

--  作者:18801459487
--  发布时间:2020/6/29 16:27:00
--  求助:目录树怎么选择上一级
完全按照官网帮助和视频介绍做的目录树,用dropdownbox绑定到窗口中,
可以选择2级的具体选项,但是1级的大项选不了,怎么才能设置呢,
或者有没有教程,抱歉自己没找到,求大神指点一二



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

--  作者:有点蓝
--  发布时间:2020/6/29 16:46:00
--  
按照那个帮助做的?怎么做的?具体设置和代码?
--  作者:18801459487
--  发布时间:2020/6/29 18:12:00
--  

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


是这个帮助手册

目录树Nodemouseclick
If e.Node.Level = 1 Then \'如果单击的是第二层节点
    Dim tr As Row = Tables("DXJ").Current
    Dim dr As DataRow = e.Node.DataRow \'获取生成此节点的DataRow
    tr("测项1A") = dr("测项")
    tr("测项1B") =dr("测项") &  "__"  & dr("测项具体")
    e.Form.DropDownBox.Value = tr("测项1B") \'这行不是多余的,省略此行,无法在表中正常使用此下拉窗口输入数据.
    e.Form.DropDownBox.CloseDropdown()
End If

窗口afterload
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree("测项表","测项|测项具体")


--  作者:有点蓝
--  发布时间:2020/6/29 20:31:00
--  
那么请仔细看帮助说明呀,关键的代码都有注释和说明,尽量去理解代码,不要就会抄!如果要所有节点都可以点,去掉这个判断

If e.Node.Level = 1 Then \'如果单击的是第二层节点