权限的授予

Question

delphi实现用户权限的授予，不同用户赋予不同得权限，代码实现，思路

Answer 1

笨方法~ 
在用户表中加个权限字段
然后 循环
          if 权限=‘’ then
          begin
            开放的和禁用的条件
          end
          else
          begin
            if 权限=‘’then
            begin
              开放的和禁用的条件
            end
            else
            ……
          end;希望对你有点帮助吧