我解决用TTREEVIEW描述数据库记录了。

Question

在开发文档中好像有一篇用TTreeView将注册表读出来的，可以用那个方法。

Answer 1

非常感谢sabit的这段程序，我在解决有上下级关系的部门管理的时候，也早就想到用递归的方法了，却苦于对delphi学的不够深入而不能实现。看了你的程序后我成功的实现了。在次先谢谢了。但是这里还少一点代码：就是
type
pnodeinfo = ^nodeinfo;
nodeinfo = record
  str:string;
end;
最后，递归也有弊端，数据量大的时候程序速度会很变慢；