关于treeview点击节点前‘+’时,节点图标变化的问题? 可以,在TreeView的OnExpand / OnCollapsed中书写下面的代码就可以了:node.ImageIndex:=YourImageIndex;node.Selected:=true; 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 不过有个更好的方法,只要在属性编辑其中进行设置就可以了,双击TreeView,可以设置他们的ImageIndex。 你们没明白我的意思,你们试试点‘+’和点item一样吗?点‘+’时,item是没有被选中的。 请使用THitTests,参考代码如下:procedure TTreeView.WMRButtonDown(var Message: TWMRButtonDown);var ANode : TTreeNode; HitTest : THitTests;begin ANode:=GetNodeAt(Message.XPos,Message.YPos); HitTest:=GetHitTestInfoAt(Message.XPos,Message.YPos); if(htOnButton in HitTest) then Selected:=ANode;end;THitTests专用于测试用户点击了TreeView的什么地方 to Davidyang:KingRon说的完全正确,你自己试一试吧!在点+时 OnExpanding和OnExpanded被触发,在处理代码中写上:node.ImageIndex:=YourImageIndex;node.Selected:=true;//或TreeView.selected:=Node;这时你选择的带+的Item被选中,图标也改变了,树展开。你直接点+号的Item时不触发该事件,你可以让不展开的Item设为另一图标,只要在创建时加上:node.ImageIndex:=YourImageIndex1;当然你的YourImageIndex1=YourImageIndex时,只要选中,则为同一图标。 to lixif:这么简单的问题,用这么复杂吗? //你们没明白我的意思,你们试试点‘+’和点item一样吗?点‘+’时,item是没有被选中的。哎,我的第一个回答你没有去测试吗?气愤。。 点‘+’和点item 不一样所以才应使用THitTests delphi梦魇怎么清除啊,金山的专杀根本没用 存储过程多参数传递问题? 求助:以前的c/s系统是Delphi2做的,现在升级要改用Delphi5来做了,请问应注意什么呢? 关于动态创建计算字段!200分进者有分 如何设置View|Type Library的参数? 有空请帮我看看这段代码,关于控件名称与变量的结合,不知该如何写 这个软件有没有市场! TDataSet.OnPostError 事件。 我在主窗体main设的个变量,怎么在子窗体中调用呢?? 如何产生多个顶层表单 简单问题:SQL按日期过滤的问题 我的DELPHI程序为何打不出来?
procedure TTreeView.WMRButtonDown(var Message: TWMRButtonDown);
var
ANode : TTreeNode;
HitTest : THitTests;
begin
ANode:=GetNodeAt(Message.XPos,Message.YPos);
HitTest:=GetHitTestInfoAt(Message.XPos,Message.YPos); if(htOnButton in HitTest) then
Selected:=ANode;
end;THitTests专用于测试用户点击了TreeView的什么地方
KingRon说的完全正确,你自己试一试吧!
在点+时 OnExpanding和OnExpanded被触发,在处理代码中写上:
node.ImageIndex:=YourImageIndex;
node.Selected:=true;//或TreeView.selected:=Node;
这时你选择的带+的Item被选中,图标也改变了,树展开。
你直接点+号的Item时不触发该事件,你可以让不展开的Item设为另一图标,只要在创建时加上:
node.ImageIndex:=YourImageIndex1;当然你的YourImageIndex1=YourImageIndex时,只要选中,则为同一图标。
这么简单的问题,用这么复杂吗?