请教Treeview问题

Question

我的根点是自己手动加进去的。
一个是  部门
一个是  楼号
而它们的子结点都来自不同的表。子结点已从数据库中获得。
如：我现在想点击部门里面的一个子结点(属于子结点的有多条记录），让它的信息显示到Edit中。
各位怎么搞定treeview.change()事件.

Answer 1

procedure TForm1.TreeView1Click(Sender: TObject);
begin
Edit1.Text:=TreeView1.Selected.Text;
end;

Answer 2

Edit1.Text:=TreeView1.Selected.Text; 晕 来晚拉

Answer 3

procedure TForm1.TreeView1Click(Sender: TObject);
begin
  if TreeView1.Selected=nil then exit;
  Edit1.Text:=TreeView1.Selected.Text;
end;

Answer 4

procedure TForm1.TreeView1Click(Sender: TObject);
begin
  if TreeView1.Selected<>nil then    ////加此句用于判断选择的是否为空节点
    Edit1.Text:=TreeView1.Selected.Text;
end;