将 treeview 的 hideselection 属性设置为 false

解决方案 »

  1.   

    to 上就这么简单:)见笑了
    我用的方法说出来的笑死你
    我在treeexit加入代码控制一个st1: TStaticText;让他挡住tree上面的节点
    然后在treeEnter把他隐藏
    procedure Tfmain.treeExit(Sender: TObject);
    var mr:trect;
    begin
    tmpnode:=tree.Selected;
    mr:=tmpnode.DisplayRect(true);
    st1.Font:=tree.Font;
    st1.Caption:=tmpnode.text;
    st1.Left:=mr.Left+3;
    st1.Top:=mr.Top+5;
    st1.Visible:=true; 
    end;procedure Tfmain.treeEnter(Sender: TObject);
    beginst1.Visible:=false;
    end;