不使用指针,怎样给treeview添加node?
treeview怎样区分每一个node?原来是通过node.data 指向一个记录型指针。如果不用指针呢?谢谢了。

解决方案 »

  1.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
      node: TTreeNode;
    begin
      node := tv.Items.AddChild(nil,'第一层');
      tv.Items.AddChild(node, '第二层1');
      tv.Items.AddChild(node, '第二层2');
      tv.Items.AddChild(node, '第二层3');
      tv.Items[0].Expanded := true;
      {
        node := tv.Items[0]//第一个(第一层)
        node := node.getFirstChild;//第一个下的第一个:)
        node := node.getNextSibling;//第一个下的第二个:)
      }
    end;
      

  2.   

    treeview怎样区分每一个node?
    RE: TreeView.items[i].ItemId 这个属性可以唯一标识该结点