- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 目录树控件选择的节点，节点背景色和节点字体颜色代码控制无效 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=49698)
-- 发布时间：2014/4/22 20:50:00
-- 目录树控件选择的节点，节点背景色和节点字体颜色代码控制无效
-- 发布时间：2014/4/22 20:53:00
--
不应该有这个问题，上传个例子说明。
-- 发布时间：2014/4/23 0:34:00
--
例子：
-- 发布时间：2014/4/23 0:39:00
--
选择采购入库明细表，点击显示按扭，将打开目录树
-- 发布时间：2014/4/23 8:31:00
--
测试没有问题啊,失去焦点了颜色依然在
此主题相关图片如下：qq截图20140423083008.png
-- 发布时间：2014/4/24 19:21:00
--
显示器刚修好，回复晚了，见谅！
-- 发布时间：2014/4/24 19:39:00
--
显示器刚修好，回复晚了，见谅！
看了一下，用代码设置有效的。但是焦点单元格默认就是浅蓝色的，遮住了设置的内容。
我看你的例子，你想实现怎样的内容？如果要改变焦点单元格的背景颜色等，需要特殊编写代码的。
-- 发布时间：2014/4/24 19:43:00
--
改变焦点节点的方法
Dim tree As System.Windows.Forms.TreeView = Forms("xxx").Controls("TreeView1").BaseControl
For i As Integer = tree.Controls.Count - 1 To 0 Step -1
If tree.Controls(i).Name = "SelectLab" Then
tree.Controls.RemoveAt(i)
End If
Next
Dim selCon As System.Windows.Forms.Control = tree.Controls("SelectLab")
Dim label As New System.Windows.Forms.Label
label.Name = "SelectLab"
label.AutoSize = False
label.BackColor = Color.Red
label.ForeColor = e.Node.ForeColor
label.Font = tree.Font
mytree.BaseControl.Controls.Add(label)
selCon = Label
Dim node As System.Windows.Forms.TreeNode = tree.SelectedNode
selCon.Size = new Size(node.Bounds.Width, node.Bounds.Height)
selCon.Location = new Point(node.Bounds.X, node.Bounds.Y)
selCon.Text = e.Node.Text
-- 发布时间：2014/4/24 22:37:00
--
先试试，谢谢
-- 发布时间：2014/4/24 22:43:00
--