delphi 权限控制问题

来源:百度知道 编辑:UC知道 时间:2024/05/12 12:35:29
我用delphi 编成,现在想实现 不同操作人有不同的权限(管理员可动态设定)。
那位能给我提供一些方法或参考文档,最好是你亲自用过,感觉不错的,免得本人走弯路。
谢谢

把权限放在数据库里
asp都这么干的,原理一样

建立个用户表里面放着权限控制
在你想要实现权限的地方读这个表的值就可以了
eg:
在窗体create的时候如果是管理员就可以看label里的东西
label.visible:=false;
qry1.sql.add('select * from login where username='+quotedstr(username));
if qry1.fieldbyname('groups').asstring='admin' then label.visible:=true;