Foxtable(狐表)用户栏目专家坐堂 → 一个关于Ttreview的问题


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

主题:一个关于Ttreview的问题

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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2013/1/17 16:55:00 [显示全部帖子]

 思路颠倒了。应该是用buildTree生成目录树以后,插入所有类型的。

 比如 trv 是treeview

 trv.Nodes.Insert("显示所有行", 0)

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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2013/1/17 17:23:00 [显示全部帖子]

以下是引用dreamyuan在2013-1-17 17:08:00的发言:

trv.Nodes.Insert("显示所有行", 0)

那跟加载的是同一个根节点,我是想把加载的内容放在“所有类型”的子节点中


插入一个节点以后,把下面的节点向右移动一格。

比如代码

Dim tr As WinForm.TreeView = e.Form.Controls("TreeView1")
tr.Nodes(1).MoveRight()

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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2013/1/17 17:41:00 [显示全部帖子]

 这样

Dim tv As WinForm.TreeView
tv =e.Form.Controls("TreeView1")
tv.BuildTree("商品类型", "商品类型")
tv.Nodes.Insert("所有类型", 0)
tv.Nodes(1).MoveRight()

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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2013/1/17 17:54:00 [显示全部帖子]

 可以这样,用sql语句生成一个表。

 dim cmd as new sqlcommand
 cmd.CommandText = "Select '所有类型' as 附加列,  商品类型 from {商品类型}"
 dim dt as datatable = cmd.ExecuteReader
 
 Dim tv As WinForm.TreeView
 tv =e.Form.Controls("TreeView1")
 tv.BuildTree(dt, "附加列|商品类型")

 回到顶部