怎么样实现双击一个node弹出相应的窗口?

解决方案 »

  1.   

    首先在TreeView的MouseDow下面获取X,Y值,之后在双击下面写如下代码:var
      HT:THitTests;
    begin
      HT:=TreeView1.GetHitTestInfoAt(ZuoBiao.X,ZuoBiao.Y);
        if (htOnItem in HT) then
          begin
             //创新窗体代码...
          end;
    end;
      

  2.   

    procedure TForm1.TreeView1DblClick(Sender: TObject);
    begin
        if TreeView1.Selected = nil then exit;
        if TreeView1.Selected.Text = 'XXX' then
        begin
            formXXX.show;
        end;
    end;