算法高手请进! 求Delphi中树的表示方法(不要告诉我用TreeView)

想在程序中用树形结构来传递一些中间过程值, 请问如何定义一棵对? 最好是简单的实现, 
以前看过TreeVIew的代码, 实在太多, 不明白.
另外, XML也不可取, 因为要用到递归, 不太方便做到函数中. 主要是性能问题

解决方案 »

  1.   

    treeview算简单的好么？要是那个都看不懂的话还是别用树了
    这是个简单例子
    http://www.cnblogs.com/piaoliuxia/archive/2008/09/06/1937317.html
      

  2.   

    TreeView我很熟悉, 但我希望能用一个结构/链表等来实现, 因为我希望能把一些功能封装在DLL中.
    另外, TreeView的节点存储的信息太少
      

  3.   

    Type
      PMyNode = ^TMyNode;
      TMyNode = record
        ParentNode : PMyNode;
        ID : integer;
        Name : AnsiString;
        and more...
      end;这个结构可以用来描述简单的树型结构,当ParentNode=NIL的时候就是顶,
      

  4.   

    TreeView的节点存储的信息太少
    不敢苟同
    data可是object类型的
      

  5.   

    treeview的缺点是遍历比较慢，还是一个可视、系统（com）控件
    另外，就是不直接支持tree-grid模式，不能分栏显示（只能一统到底）
    节点能挂（存储）的信息因为有data，不会少的
    我是嫌分配、释放空间（data将指向它）麻烦，增加了一个datastring因为第一个原因，的确打算自己实现一个树的存存储对象，好像曾经实现过
      

  6.   

    仅仅这个是远远不够的需要支持整体的导入、导出，子节点的遍历（树顺序、兄弟顺序）
    以及与treeview的高效互导
      

  7.   

    data可以存取结构来解决你的问题。我写过的一个效率极高的程序：http://www.mwymwy.com/D7.exe