怎样把TTreeView写成TCheckTreeView,有没有办法啊?

WuLoveXue 2003-08-19 08:41:21

就是要在树的各节点前加上checkbox框,我不想用第三方控件,能不能自己改写类来实现?

...全文

61 21 打赏收藏转发到动态举报

写回复

用AI写文章

21 条回复

切换为时间正序

请发表友善的回复…

发表回复

rgwfeng2 2003-12-28

打赏
举报

mark

A_ZHU 2003-08-27

打赏
举报

已收藏！

ihihonline 2003-08-27

打赏
举报

以前的FAQ

哪儿有带checkbox的treeview控件下载？
---------------------------------------------------------------

在TreeView中有一个Check的属性,是允许带有CheckBox,去找找,不用与Down
---------------------------------------------------------------

1stclass中的fctreeview
www.51delphi.com

---------------------------------------------------------------

dx控件中的dxTreeView1可以設置
在delphi窯洞里有下載
---------------------------------------------------------------

Rxlib控件组里面也有，强烈推荐这套控件组，功能非常强大

ayukowa 2003-08-27

打赏
举报

zhangxinji() (
感谢
这么好的东西
收藏1!

zhangxinji 2003-08-24

打赏
举报

你点一下结点
就会打上勾
它的selected属性就是true了
不知道我说的你明白不明白

zhangxinji 2003-08-24

打赏
举报

加了checkbox之后就只有两种状态,选中未选中
,你说的取值,我不太清楚
你再详细说一下

yhzxf 2003-08-22

打赏
举报

最简单的方法:
你可以在每一项的前面加一个前缀加以区别
如【Y】代表选中
【N】代表未选中
只需要判断前缀就可以了

hp0773 2003-08-22

打赏
举报

zhangxinji() 我试过了，check是有了，但是不知道怎么取值？

大地精灵 2003-08-22

打赏
举报

楼主，我已经把代码发到你邮箱了，如果没收到的话，你再发个邮件给我吧，或者用QQ跟我联系,1068737371

WuLoveXue 2003-08-20

打赏
举报

期待有人帮我!

zhangxinji 2003-08-19

打赏
举报

很容易的
我给你

我用过可以的

DELPHI隐藏有一个设置控件属性的函数（把这个函数拷贝到你的程序中）
procedure SetComCtlStyle(Ctl: TWinControl; Value: Integer; UseStyle: Boolean);
var
Style: Integer;
begin
if Ctl.HandleAllocated then
begin
Style := GetWindowLong(Ctl.Handle, GWL_STYLE);
if not UseStyle then Style := Style and not Value
else Style := Style or Value;
SetWindowLong(Ctl.Handle, GWL_STYLE, Style);
end;
end;
新版的WIN公共控件的TREEVIEW中有DELPHI中没有的风格定义
const
TVS_CHECKBOXES = $0100;
*****用下面的语句既可给TTREEVIEW加CHECKBOX
SetComCtlStyle(TreeView1,TVS_CHECKBOXES,True);

WuLoveXue 2003-08-19