H hapmarien Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-10 #1 我们正在做一个项目，用户要求对功能进行权限管理，使用角色管理怎么实现？ 特向各位高手说详细点，或者告诉我相关的资料！
B bigroute Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-10 #2 建一个Operator表，里面有登录名、密码、权限（100个Char）..... 100Char代表100个权限，1允许，0是不允许，结果是'101011010111010101...'这样的。
M Milpas Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-10 #3 不同的用户能够使用不同的功能呗 根据你的情况来设定用户级别，再把用户级别与功能连起来
X Xelloss Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-10 #5 2楼的方法可行 其实也可以换成10进制存 角色只是拥有特定的权限，给用户符角色的话 可以将 用户权限码 or 角色权限码
H hapmarien Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-10 #9 我也bigroute的方法可行，觉得这种方法可以实现所见即所得的权限管理； 你的意思是否指把项目分解为许多小操作，供管理员设定权限； 100个char是否每位对应一个操作呢？ 项目初始化时读取这个权限表？
我也bigroute的方法可行，觉得这种方法可以实现所见即所得的权限管理； 你的意思是否指把项目分解为许多小操作，供管理员设定权限； 100个char是否每位对应一个操作呢？ 项目初始化时读取这个权限表？
B bigroute Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-10 #10 100个Char代表100个权限， 下面是如果实现。 没有使用权限的菜单就会被禁掉，Button也一样。 var s :string; begin s :=Trim(Table1.FieldByName('权限').AsString);//比如 s='11000000....' N1.Enabled :=s[1]=1; //true N2.Enabled :=s[2]=1; //true N3.Enabled :=s[3]=1; //false N4.Enabled :=s[4]=1; //false ....... Button1.Enabled :=s[99] =1; Button2.Enabled :=s[100] =1; end;
100个Char代表100个权限， 下面是如果实现。 没有使用权限的菜单就会被禁掉，Button也一样。 var s :string; begin s :=Trim(Table1.FieldByName('权限').AsString);//比如 s='11000000....' N1.Enabled :=s[1]=1; //true N2.Enabled :=s[2]=1; //true N3.Enabled :=s[3]=1; //false N4.Enabled :=s[4]=1; //false ....... Button1.Enabled :=s[99] =1; Button2.Enabled :=s[100] =1; end;
梦 梦菲斯 Unregistered / Unconfirmed GUEST, unregistred user! 2002-12-10 #11 工作角色表，角色表，事务表（如修改口令），角色事务处理表，用户表，每样都可以无限 护展！。。。。。我做了几个，都是这样做的！
