H hailang8 Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #1 就是设置系统的权限,把每一用户的操作区分开来。 我现在想做一个能由系统管理员设置的权限 由系统管理员来给每一位用户授权 指点有分 好的再加分
幸 幸福鸟 Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #2 把所有菜单放入数据库,然后为每个用户分配他所能操作的菜单!
T tjj Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #4 如果是简单赋权,就把菜单放入数据库中就行; 复杂一点 先根据权限的级别把权限分类, 把功能编码放入一个授权表;然后在用户表中存放用户的权限编码(可以是多个权限的编码串); 使用时先取出用户的权限编码,判断用户是否有权限;我们的系统就是这样管理权限的。 不好意思说的不太清楚
如果是简单赋权,就把菜单放入数据库中就行; 复杂一点 先根据权限的级别把权限分类, 把功能编码放入一个授权表;然后在用户表中存放用户的权限编码(可以是多个权限的编码串); 使用时先取出用户的权限编码,判断用户是否有权限;我们的系统就是这样管理权限的。 不好意思说的不太清楚
L lanbing1400 Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #5 设置数据表存放权限信息 可以由字符串组成 1表示有权限,0表示没有权限 每一位代表一个模块的权限 字符串长度由模块数量决定
H hailang8 Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-04 #7 to lanbing1400 设计数据库表时,那字段应该怎设计比较好呢
S shiwee Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-09 #11 自己从Tmenu做一个class,多加一个属性表示权限,不同的用户可以设置不同的权限,加一两个对此属性操作的函数。 这样不用操作数据库了。
H hailang8 Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-10 #12 to shiwee 我着手delphi还没多久由许多都不懂 你能不能详细的解释 能带代码最好 谢谢了
S shiwee Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-10 #13 type TMyMenu = Class(TMenu) private FPri: Integer; //权限 public procedure SetPri(pri: Integer); //设置权限 function GetPri(): Integer; //获得需要的权限值 end; function CanAccess(Pri: Integer; menu: TMyMenu): Boolean; //比较大小,有权限访问就返回True. 我的思路大概是这样的,不一定好。供参考。
type TMyMenu = Class(TMenu) private FPri: Integer; //权限 public procedure SetPri(pri: Integer); //设置权限 function GetPri(): Integer; //获得需要的权限值 end; function CanAccess(Pri: Integer; menu: TMyMenu): Boolean; //比较大小,有权限访问就返回True. 我的思路大概是这样的,不一定好。供参考。