以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  窗口目录树节点图标,请教老师  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=73903)

--  作者:mamuaiqing
--  发布时间:2015/8/28 19:34:00
--  窗口目录树节点图标,请教老师

像图中的节点图标是怎么做出来的,请教老师


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150828193207.jpg
图片点击可在新窗口打开查看

--  作者:lmk
--  发布时间:2015/8/28 20:21:00
--  

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

--  作者:mamuaiqing
--  发布时间:2015/8/29 17:35:00
--  
这样设置出来的都是同样的图标,图中的图标是根目录,子目录都不一样
--  作者:有点蓝
--  发布时间:2015/8/29 17:48:00
--  
如果是保存为文件的目录树就可以每个设置
而动态加载treeview要设置IconFile
[此贴子已经被作者于2015/8/29 17:48:51编辑过]

--  作者:Hyphen
--  发布时间:2015/8/29 17:49:00
--  
按照2楼的方式设置后,在代码中给所有节点的IconFile属性赋值
--  作者:大红袍
--  发布时间:2015/8/30 10:32:00
--  

动态设置就行,如

 

 Dim tr  As WinForm.TreeView
tr = Forms("窗口1").Controls("TreeView1")
For Each nd As WinForm.TreeNode In tr.AllNodes
    If nd.Level = 0 Then
        nd.IconFile = "d:\\test.ico"
    Else If nd.level = 1 Then
        nd.IconFile = "d:\\test.ico"
    End If
Next

[此贴子已经被作者于2015/8/31 10:10:56编辑过]

--  作者:mamuaiqing
--  发布时间:2015/9/1 19:17:00
--  
好,了解了,感谢老师们的帮助