★分享：设置TreeView控件的背景色(VFP源码)★

狂龙骄子 2010-09-05 11:00:53

设置TreeView控件背景色(草绿色)

设置TreeView控件背景色(淡蓝色)

设置TreeView控件的背景色(VFP源码)

...全文

743 19 打赏收藏转发到动态举报

写回复

用AI写文章

19 条回复

切换为时间正序

请发表友善的回复…

发表回复

phenloo 2011-05-27

打赏
举报

如果最顶层的节点只有一个，那么左边还是会出现一个白色块。怎么处理呢？

jackson001 2010-10-04

打赏
举报

Thanks !

dywfada 2010-10-01

打赏
举报

我弄了好久都没弄明白这个控件怎么用的

zhangdengyi 2010-09-29

打赏
举报

ding...ding..

czw8819 2010-09-26

打赏
举报

czw8819 2010-09-26

打赏
举报

我试过,不行。有节点的地方底色还是白色。

everyday1212 2010-09-19

打赏
举报

灵的！！
如果TreeView是VFP自带的内部控件就好了

anui_2001 2010-09-14

打赏
举报

高深，留下了，高手如云呀！

xilaianzxsc 2010-09-14

打赏
举报

不错,收藏一下

wwwwb 2010-09-07

打赏
举报

呵呵，谢谢共享

taohua300 2010-09-07

打赏
举报

[Quote=引用 9 楼 sn_keys 的回复:]
呵呵，感谢“彭兄”的补充~~
[/Quote]哈哈
还是你聪明，经你提示我才发现是个‘彭’字

狂龙骄子 2010-09-07

打赏
举报

呵呵，感谢“彭兄”的补充~~

ACMAIN_CHM 2010-09-06

打赏
举报

WWWWA 2010-09-06

打赏
举报

学习，谢谢

十豆三 2010-09-06

打赏
举报

TreeView变背景色
*---------------

TreeView 5.0：无 Checkboxes 功能
假设 TreeView 控件的 Name 值为 OleTreeView5，然后在表单的 Init 事件加代码：

#Define TVM_SETBKCOLOR 4381
Declare Long SendMessage In User32 Long HWnd,Long wMsg,Long wParam,Long Lparam
=SendMessage(Thisform.OleTreeView5.HWnd,TVM_SETBKCOLOR,0,Rgb(200,200,255))

TreeView 6.0：每个层节点的最后一个节点下方还是有一部分白色的，美中不足。
假设 TreeView 控件的 Name 值为 OleTreeView6，然后在表单的 Init 事件加代码：

m.lnTreeBackColor=Rgb(200,200,255) &&要改成此颜色
#Define TVM_SETBKCOLOR 4381
Declare Long SendMessage In User32 Long HWnd,Long wMsg,Long wParam,Long Lparam
=SendMessage(Thisform.OleTreeView6.HWnd,TVM_SETBKCOLOR,0,m.lnTreeBackColor)
For m.lnI=1 To Thisform.OleTreeView6.Nodes.Count
Thisform.OleTreeView6.Nodes(m.lnI).BackColor=m.lnTreeBackColor
Endfor

dfwxj 2010-09-05