同志们，请问树节点上怎么放对象啊，100分！！！

Question

请问树节点上怎么存放一个对象或者是Record（我要在组织机构树上放部门信息，同时放部门ID，部门名称等），是不是要用到Pointer啊，具体怎么用，最好能给出例子，急需这样一个东西，来不及对翻书了，以前我是用JAVA的很好实现。

Answer 1

treeview1.Items[1].Data :=xxx
存对象的指针

Answer 2

用控件，DevExpress。
自己做的话，脱离开数据库自己画节点就可以啊。

Answer 3

如果是对象可以直接将Data:=对象结构体
PMyRec=^TMyRec;
TMyRec=Record
  Name:String;
  ID:Integer;
end;var
  MyRec:TMyRec;
begin
Treeview1.selected.data=@MyRec;PMyRec(TreeView.Selected.Data).Name:='21234';
end;

Answer 4

结贴呵，基本搞定，谢谢各位，我的做法类同于   ZyxIp(绝望中...)