急急急！怎么为系统的类添加一个属性 TTreeNode

Question

用类的继承创建一个新类,在新类中添加key属性

Answer 1

type
TYouTreeNode = class(TTreeNode)
public
  key : integer;
end;...youtreenode := TYouTreeNod.create(...)
youtreenode.key := 1;

Answer 2

create(里面写什么啊)
我刚学delphi没有多久不会阿

Answer 3

新建一个类，不用这么麻烦用TTreeNode.StateIndex看看行不行

Answer 4

youtreenode := TYouTreeNod.create(这里面放什么啊)
youtreenode.key := 1;
//我想用字符串的那种关键字

Answer 5

TYouTreeNod.create(...)
...是你的Treeview 的名称， key 的类型你想用什么就用什么，没关系的

Answer 6

我试出来了，TDDNdelphi的帮助真难看，
那我在单击节点的时候怎么使用这个新加入的key呢
我用treeview1.selected 没有key这个，怎么样才能有呢

Answer 7

TYouTreeNod(treeview1.selected ).key