求助如何TTreeView选中不同的节点，右边TListview显示选中的详细信息

[popcom]

在Ttreeview控件中，选中一个节点，如何能够让右边的TListview显示所选中的记录。
比如，一个公司机构的的节点，左边treeview,选中一个节点如办公室，该节点（办公室）下面还有好几个节点，如市场管理，后勤管理等，每一个部门都有好多个人，如何能让选中一个办公室节点后，右边的的Tlistview，显示该办公室节点下的所有人？而选中办公室某一个节点又单独显示该节点的人？

[g961681]

用结点的StateIndex保存结点类型，便于后面判断结点！

[g961681]

procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode);
begin
if TreeView1.Selected = nil then Exit;
case TreeView1.Selected.StateIndex of
1: //选中学校结点
begin
ListView1.Clear;
ListView1.Items.Add.Caption := '初一';
ListView1.Items.Add.Caption := '初二';
ListView1.Items.Add.Caption := '初三';
end;
2: //选中班级结点
begin
ListView1.Clear;
ListView1.Items.Add.Caption := '王名';
ListView1.Items.Add.Caption := '王青';
ListView1.Items.Add.Caption := '王兵';
end;
end;
end;

[g961681]

1.窗体上就一个TreeView和一个ListView
2.TreeView中，就两个结点一个学校结点（StateIndex为1），一个班级结点（StateIndex为2）

[popcom]

就是在treeview中有
**********
－班级
－－张三
－－李四
....

在listview中显示
**********
姓名 性别 年龄 专业
－－张三 男 22 会计

你点击treeview中那个学生就显示学生的全部信息
怎么做 啊。急。在线等。。。。。

[popcom]

自己顶一下

[softbugg]

选中treeview后刷新listview内容。

[popcom]

怎么刷新啊

[才子鸣]

顶

[见丰]

在treeview的onclick里面写代码，根据treeview.Selected.StateIndex来判断所选节点的层次，用一个case语句(究竟是不是stateIndex记不清了，应该差不多就是这种拼法的一个属性，前提是你在创建节点是必须手工指定好这个属性)

[popcom]

能不能给源码啊，大侠

[yiweijin]

如果有数据库的情况下
在TREEVIEW确定它被选中的字符串
然后通过循环语句把该机构下的具体信息读入
LISTVIEW

[popcom]

没有数据库，就是这两个控件实现。怎么实现啊

[popcom]

再顶一下，在线等