如何对动态添加进的空节点使其处在文字编辑状态,可以直接编辑节点显示的文字

解决方案 »

  1.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
      i:integer;
    begin
      for i := 0 to TreeView1.Items.Count - 1 do
      begin
        if TreeView1.Items.Item[i].Text = '22' then
          TreeView1.Items.Item[i].EditText;
      end;
    end;
      

  2.   

    treeview1.Items.Item[0].EditText;=True;
      

  3.   

    不好意识,没看仔细,改一下procedure TForm1.Button1Click(Sender: TObject);
    var
      i:integer;
    begin
      TreeView1.Items.AddChild(nil,'11');
      TreeView1.Items.AddChild(nil,'');
      for i := 0 to TreeView1.Items.Count - 1 do
      begin
        if TreeView1.Items.Item[i].Text = '' then
          TreeView1.Items.Item[i].EditText;
      end;
    end;