N nathanlee Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-21 #2 用componment,然后判断所有是菜单项的控件,根据对应的数据字段,如果是1就enabled 是0就disable
L lp414 Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-21 #3 没什么特定算法吧。 楼上的说得只能两层权限 我的思路：设置一个权限变量，如果他是1，就是1级权限。2就是2级权限。可以轮推。 第一，用这个变量将菜单项和按钮按照登陆权限打开，该ENABLE就ENABLE,该DISABLE就DISABLE 第二,特定功能就要检验权限。 第三，本来没有第三，怕大家忘记了，所以说一下。就是登陆，注销前后按照鉴别一下权限。
没什么特定算法吧。 楼上的说得只能两层权限 我的思路：设置一个权限变量，如果他是1，就是1级权限。2就是2级权限。可以轮推。 第一，用这个变量将菜单项和按钮按照登陆权限打开，该ENABLE就ENABLE,该DISABLE就DISABLE 第二,特定功能就要检验权限。 第三，本来没有第三，怕大家忘记了，所以说一下。就是登陆，注销前后按照鉴别一下权限。
山 山猫 Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-21 #5 是呀, 是呀. 用权限表 吧. 我们局用的 公文 处理系统 , 在 人员表 中. 每个人身后 都 有 32 位 如 二进制 代码 般的 权限 表. 就 1 或 0 代表 有无 此权限, 每一位代表一种特定的 权限, 如, 转 发权, 拟文权, 批文 权 等 .
是呀, 是呀. 用权限表 吧. 我们局用的 公文 处理系统 , 在 人员表 中. 每个人身后 都 有 32 位 如 二进制 代码 般的 权限 表. 就 1 或 0 代表 有无 此权限, 每一位代表一种特定的 权限, 如, 转 发权, 拟文权, 批文 权 等 .
B boyjason Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-22 #6 山猫兄的意见是指每个权限用一位代替，然后在窗体生成时对每个控件进行disable or Enable？
C chshanghai Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-22 #8 用Tmanageraction 然后 只要设置相应的action 的enabled 就行了.
N Nizvoo Unregistered / Unconfirmed GUEST, unregistred user! 2002-07-22 #10 设置的确是个不小的工程。 许多tag几乎都用了。 在我这里是这样用的 if 控件功能号 in 登陆人员的功能列表 then 此控件.Visible := True else 此控件.Visible := False; 实际中比这个复杂一些，还涉及其它的事情。
设置的确是个不小的工程。 许多tag几乎都用了。 在我这里是这样用的 if 控件功能号 in 登陆人员的功能列表 then 此控件.Visible := True else 此控件.Visible := False; 实际中比这个复杂一些，还涉及其它的事情。
