重要的是思路(人事结构)(200分)

  • 主题发起人 主题发起人 lantian329
  • 开始时间 开始时间
L

lantian329

Unregistered / Unconfirmed
GUEST, unregistred user!
工号 姓名 主管
1 111 0
2 222 1
3 333 2
4 444 3
5 555 3
6 666 1
……
……
以上为数据库 renyuan表中的记录
请利用treeview控件将上述关系表示出来!!
如:
0----1----2----3----4
| |
| -----5
-----6
另外请问
treeview是如何遍历的?
我只剩55分了!
 
你可以用DEVELOPER EXPRESS 的dbtreeview,按你说的这种格式,连上datasource即可。
网上有侠载的。
 
to: LiZhongYu
能告诉我网址吗?
 
先通过查询保证子结点在父结点的后面。
然后一条一条记录读出来,如果父结点为了直接加入,否则在已加入的结点中找到父结点,再加入。
 
http://www.8421.org/download.php?id=133
试试行不行。
 
可以用递归,
procedure treeview_init(Pname:string);
begin
select * from table where 主管=pname;
while not eof
begin
加入Query值到treeview;
treeview_init(Query值);
Query.next;
end;
end;

这样的问题不必要使用第三方控件!
尽量不用第三方控件!
 

Similar threads

D
回复
0
查看
810
DelphiTeacher的专栏
D
D
回复
0
查看
757
DelphiTeacher的专栏
D
后退
顶部