【搞定】功能树双击合并能否改成单击合并**

caoyeziqq

功能树双击合并能否改成单击合并.
谢谢

yancm

修改：业务模型\系统空间\用户界面基础\界面库\组件库

procedure TOperatorFuncTreeView.Click;  
...
      else
        // 只展开
        lNode.Expanded := True;
        
    end;
  end;
end;

为

procedure TOperatorFuncTreeView.Click;  
...
      else
        // 展开并收拢
            lNode.Expanded :=Not lNode.Expanded ;     
        
    end;
  end;
end;

caoyeziqq

好了.谢谢您.可以揭贴了!

caoyeziqq

不好意思，这个方法有点不好实现。我按您的方法改了，但是发现当单击使其合并的时候有点问题。
当我点击使其合并的时候发现合并不了，先必须双击几次后来它才能在单击时打开和合并，我 不知道您测试的时候是否也是这样，反正就是感觉不灵敏。要合并已经展开的文件夹，必须先双击几次才能实现单击合并

zfang

楼主，平台什么版本？
我在2819上试过可以的阿，没你说的这个问题！

caoyeziqq

我的2918啊,反正用起来不流畅啊,但是还好不是什么大问题,我凑合用吧.谢谢您了.