zoukankan      html  css  js  c++  java
  • 学习问题总结

    不好意思,我没说清楚。
    我是想定位到根节点,并且根节点的颜色成蓝色(就像选中了一样)。

    var
        treeNode:   TTreeNode;
    begin
        TreeView1.HideSelection:=false;
        treeNode:=TreeView1.Items.Item[0];
        while   treeNode.getFirstChild   <>   nil   do
            treeNode:=treeNode.getFirstChild;
        treeNode.Selected:=true;
    end;

    node.Expand(true);

    treeview1.selected.Expanded; //判断节点的子节点是否展开True展开,否则闭拢
    treeview1.selected.Expand(True);//子节点展开
    treeview1.selected.collapse(True)://子节点闭拢  

    树节点全部展开:
    procedure TForm1.Button1Click(Sender: TObject);
    var node:TTreeNode;
    begin
    if treeview1.Items[0]<>nil then
    begin
      node:=treeview1.Items[0];
      node.Expand(true);
      while node.getNextSibling<>nil do
      begin
        node:=node.getNextSibling;
        node.Expand(true);
      end;
    end;
    end;


    树节点全部收缩:
    procedure TForm1.Button2Click(Sender: TObject);
    var node:TTreeNode;
    begin
    if treeview1.Items[0]<>nil then
    begin
      node:=treeview1.Items[0];
      node.Collapse(true);
      while node.getNextSibling<>nil do
      begin
        node:=node.getNextSibling;
        node.Collapse(true);
      end;
    end;
    end;

    节点高亮显示

    如果设置了TreeView.HideSelection:=False;

    if node.Selected then
     
    begin
        Canvas.Brush.Style :
    = bsFDiagonal;
        Canvas.Brush.Color :
    = clHighlight;
        Canvas.Font.Color :
    = clHighlightText;
     
    end;
    OnCustomDrawItem事件里只需一句TreeView1.Canvas.Brush.Style := bsFDiagonal;就可以了

    TreeView1.Select(node);

  • 相关阅读:
    网线接线分类
    MongoDB修改用户密码
    win10计算器和商店英文改中文
    电脑微信双开
    ajax
    get和post的区别
    javascript中各种继承方式的优缺点
    原型
    高阶函数的封装
    深浅拷贝
  • 原文地址:https://www.cnblogs.com/mingdep/p/2230978.html
Copyright © 2011-2022 走看看