如何选中树型节点,并对其编程。或者说,如何实现选中树型节点后,在另一个控键中(如DBMemo)显示与该节点有关的内容。

解决方案 »

  1.   

    type
     Prec=^Trec  //声明指针
     Trec=record
        name:string;//可以为任意类型
        id:integer;
        ……
        ……
    end;procedure Tform1.button1click(sender:Tobject);
    var
       p:prec;
    begin
       new(p);   //注意程序中此行
       p.name:='yexiong';
       p.id:=1;
       treeview1.addobject(null,'sdfsdf',p);
       或treeview1.addchildobject(node,'ssss',p);
    end;使用时:
    procedure Tform1.button2click(sender:Tobject);
    var
        node:ttreenode;
        s:string;
        n:integer;
    begin
        node:=treeview1.selected;
        s:=prec(node.data)^.name;
        n:=prec(node.data)^.id;
        showmessage(s);
        showmessage(inttostr(n));
    end;以上程序供参考
    你可以找一下历史贴。
    WWW.DelphiBBS.com里的历史贴有很多这方面的内容。
    这个问题我以前也问过,很少人回答,我也是找历史贴解决问题的。
      

  2.   

    主要是建立iterm时写入相应的data,
    楼上说得很对!
      

  3.   

    http://expert.csdn.net/Expert/topic/1560/1560726.xml?temp=.6157495
    看看这个,或者打上TREEVIEW查一下有好多的,不用花钱买的
      

  4.   

    TreeView本身不提供节点连接数据的保存。
     所以要注意,自己保存节点的数据.以便进行树的恢复!