树的节点 怎么让它变灰啊~~
我想让树的节点 也和菜单栏具有一样的流程, 菜单栏可以用 enabled 但树的节点没有啊``
我想让树的节点 也和菜单栏具有一样的流程, 菜单栏可以用 enabled 但树的节点没有啊``
解决方案 »
- 要求用户装adobe pdf reader 大家说合适吗?
- 如何将GetMessage(Msg, 0, 0, 0)获得消息转换成字符串,然后在发到指定的邮箱?
- 湖南郴州有搞delphi的吗?
- 怎么让delphi6的dbexpress支持mysql4.0
- 关于热力表的计费问题,请教了
- 怎么取得TreeView中右键单击处的接点
- 我要写一个小软件,用什么语言实现比较好?详细请进。。。。
- 在北京用那个语言最多?
- 我的论坛开张了,长期为初学者供应delphi源码和咨询。现在只上传了近三十个源码包,以后会增加。
- paradox类型的表如何导成mssql形式
- 在主从表单中新建记录的问题?(比效难)
- 哪里有 DELPHI 的最新的反编译器 DEDE 下载
你可以这样重画为灰色。
procedure TForm1.TreeView1CustomDrawItem(Sender: TCustomTreeView;
Node: TTreeNode; State: TCustomDrawState; var DefaultDraw: Boolean);
var
p:trect;
begin
with TreeView1.Canvas.Brush do
begin
if node.Text='1' then
begin
Color:=clGray; //颜色为灰色
p:=node.displayrect(True);
Canvas.TextOut(p.Left+2,p.Top,node.Text);
Canvas.FrameRect(node.displayrect(true));
DefaultDraw:=true;
node.Expanded:=false;//如果有子节点则不可转开
end;
end;
end;