关于TreeView节点的打开权限问题 在expanding事件中进行权限判断! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 动态生成TreeView的节点,如果没有权限就没有相应的节点,也就谈不上打开了如果改变权限,重新刷新树结构,生成新节点就可以了 你这种提法不是很好,因为不是非得点击才能移到那个节点上的,可以通过键盘也可以移动的。当生成节点树的时候,把你的权限设置到每个节点的tag属性上。在onchanging事件中,对node参数进行控制(node是即将移至的节点)。如果分层控制权限,那么可以在Node的level属性上做文章。 不会吧。。Treeview有个事件,是:type TTVExpandingEvent = procedure(Sender: TObject; Node: TTreeNode; var AllowExpansion: Boolean) of object;property OnExpanding: TTVExpandingEvent;只要写出这个事件的处理方法,根据自己的判断条件设定AllowExpansion为True或者False就行了。 delphi代码问题 关于BDE连SQL SERVER的问题(漏掉字段) 有关控件的一个事件. 菜鸟提问,请问有没有Delphi转c++的工具 如何让combobox只读 请问一个动态数组的问题? 网络游戏外挂制作之我所见(4) 在用DELPHI的DESKTOP建立数据表时,怎样录入外部关建字 delphi with excel 怎样设置installshield使安装后的程序出现在开始菜单? 如何操纵虚拟光驱? function应该放在什么地方?
如果改变权限,重新刷新树结构,生成新节点就可以了
当生成节点树的时候,把你的权限设置到每个节点的tag属性上。
在onchanging事件中,对node参数进行控制(node是即将移至的节点)。
如果分层控制权限,那么可以在Node的level属性上做文章。
Treeview有个事件,是:
type TTVExpandingEvent = procedure(Sender: TObject; Node: TTreeNode; var AllowExpansion: Boolean) of object;
property OnExpanding: TTVExpandingEvent;
只要写出这个事件的处理方法,根据自己的判断条件设定AllowExpansion为True或者False就
行了。