还是TreeView的问题。。。。

Question

假设有一个节点名字为黑龙江。
在程序中怎么实现将当前节点移动到黑龙江？
并在黑龙江下添加子节点？！

Answer 1

var node1:Ttreenode;
begin
  node1:=treeview1.Selected;
  treeview1.Items.AddChild(node1,'asd');
end;//node1就是你选择的节点，在这个节点下添加'asd'节点

Answer 2

var
  node1,node2:Ttreenode;
begin
  node1:=treeview1.Selected;
  node2:=treeview1.Items.AddChild(node1,'asd');
  TreeView1.Items.Select(node2); //可能是这样

Answer 3

elilor(elilor) 
你的方法不可以
：（（（

Answer 4

procedure TForm1.Button1Click(Sender: TObject);
var
  iPos:integer;
  Node:TTreeNode;
begin
  for iPos:= 0 to TreeView1.Items.Count-1 do
  begin
    Node:= TreeView1.Items.Item[iPos];
    if Node.Text='黑龙江'then
    begin
      TreeView1.Select(Node,[ssLeft]);
      TreeView1.Items.AddChild(Node,'asd');
      Break;
    end;
  end;
end;