如果某个节点点击了那么treeview.selected会有值
但是我现在不是用鼠标点击,能不能调用某个事件也能达到一样的效果。让程序认为就是我鼠标点击了节点?

解决方案 »

  1.   

    演示:procedure TForm1.Button1Click(Sender: TObject);
    var
      I : integer;
    begin
      for I := 0 to TreeView1.Items.Count-1 do begin
        TreeView1.Select(TreeView1.Items[I]);
        Showmessage(TreeView1.Selected.Text);
      end;
    end;
      

  2.   

    TreeView1.ItemIndex := 0;
    TreeView1Click(nil);
      

  3.   

    for i:=0 to treeview1.Items.Count-1 do
      begin
        if treeview1.Items.Item[i].Text=****** then
        begin
          TreeView1.Select(suiTreeView1.Items.Item[i]);
          TreeView1.SetFocus;
        end;
      end;
    这是个查询,并选中找到的结点.