设置模块表,操作员表及权限对应表
将所有模块记入模块表
将所有操作员记入操作员
建立权限维护界面,以设置每个操作员对模块的操作权限将对应关系记入权限对应表
在每个模块调用之前先调用权限判定函数,来决定是否有权限对这个模块进行操作
function JudgeRight(sModuleName: String): Boolean;
sModuleName是模块名,唯一标识一个模块
操作员在登录时确定
如此是一个比较齐全的权限控制过程
将所有模块记入模块表
将所有操作员记入操作员
建立权限维护界面,以设置每个操作员对模块的操作权限将对应关系记入权限对应表
在每个模块调用之前先调用权限判定函数,来决定是否有权限对这个模块进行操作
function JudgeRight(sModuleName: String): Boolean;
sModuleName是模块名,唯一标识一个模块
操作员在登录时确定
如此是一个比较齐全的权限控制过程
解决方案 »
- XMLDocument1报错:access violation at address 77107DD2 in module 'ntdll.dll'
- 我开始用Delphi进行PCI7501板子的控制编程,我有问题要问各位高手!!!!!!!
- 请教开发KTV 的VOD点播思路
- 求助!!请大家帮我看一下好吗?
- 使用 Installshield express for delphi5.0打包程序是,如何配置bde别名,我用的是oracle 数据库
- 急,关注者有分。QuickRep中Query1查询得到表中的String类型的单元怎么合计?
- 連接數據庫問題
- 计算字段如何设置不同的计算公式?
- 关于密码小键盘
- 判断窗体是否为最小化
- 竟然连一个窗体调用都搞不定了。
- 上次没说清楚,一台电脑插两个网卡可不可能实现用一个网卡读另一个卡??
壮丁已经说得很明白了,你说有什么不能实现的吧?