Foxtable(狐表)用户栏目专家坐堂 → 目录树


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

主题:目录树

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


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
目录树  发帖心情 Post By:2015/10/29 8:12:00 [显示全部帖子]

分级显示目录且能显示两列,比如汽车01,汽车又可分为商用车001、乘用车002,商用车又可分为A、C、B三种类型,其中A型车的代码假如是:01.001.001,我现在想要是分级显示每种的代码及名称,比如逐级打开代码后,会显示01.001.001 A型车,现在的三种方式要么只显示代码、要么只显示物料名称,我想要的是两个都显示,甚至显示三个及以上,该怎么办?


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


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2015/10/29 9:25:00 [显示全部帖子]

这两个我都看了,只能显示代码或名称,我想把两项并列显示出来 “代码 名称” ,


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


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2015/10/29 9:41:00 [显示全部帖子]

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.GenerateTree("物料档案", "物料编号","物料名称",".","", "物料编号 DESC")
trv.Nodes.Insert("显示所有行",0)
For Each nd As WinForm.TreeNode In trv.AllNodes
    nd.Text =nd.DataRow("物料编号") & " " & nd.DataRow("物料名称")
Next

这是我在窗口Afterload事件设置的代码,提示如下错误,不知道是什么原因。

.NET Framework 版本:2.0.50727.5485
Foxtable 版本:2015.10.26.1
错误所在事件:窗口,物料档案,AfterLoad
详细错误信息:
System.NullReferenceException: 未将对象引用设置到对象的实例。
   在 UserCode.APJL1pOId6Q78Dg9e(FormEventArgs e)


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


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2015/10/29 9:52:00 [显示全部帖子]

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.GenerateTree("物料档案", "物料编号","物料名称",".","", "物料编号 DESC")
trv.Nodes.Insert("显示所有行",0)
For Each nd As WinForm.TreeNode In trv.AllNodes
msgbox(nd.DataRow Is Nothing)
    nd.Text =nd.DataRow("物料编号") & nd.DataRow("物料名称")

Next

加了红色代码后,显示一次ture,然后就是提示错误


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


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2015/10/29 9:57:00 [显示全部帖子]

可以了

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


加好友 发短信
等级:九尾狐 帖子:2234 积分:15278 威望:0 精华:0 注册:2015/7/18 10:10:00
  发帖心情 Post By:2015/10/29 9:58:00 [显示全部帖子]

谢谢

 回到顶部