如何在TTreeView中添家TTreeNode?

Question

var node1,node2:Ttreenode;  node1:=tree.selected;
  node2:=tree.items.addobject(node1,'Test');
              //在 node1 下面添加子接点
              //应该是这个方法，如果不可以，可以看看帮助，，

Answer 1

var
  topnode,firstchildnode: TTreeNode;
  
begin
  topnode:=TreeView1.Items.ADD(NIL,'topnode');
  firstchildnode:=TreeView1.Items.ADDChild(topnode,'fchildnode');
end;

Answer 2

ADD 是增加同级节点
addchild是子节点，必须add（节点位置，txt）
add（节点位置，text）

Answer 3

note2:=treeview1.items.add(nil,'treenode_caption');
note2.imageindex:=0;//正常时节点图象
note2.selectedindex:=1;//选择该节点时的图象