文件名称:delphi 组权限设置
文件大小:875KB
文件格式:RAR
更新时间:2012-05-31 10:55:41
delphi组权限设置
用户组权限设置,代码简单,控制权限方便,可扩展性好。 通过系统管理员进入 权限设置,设置权限组及该组的功能。 然后通过用户设置,设置用户并指定用户是哪个组,改用户就赋予该组的权限。 使用actionlist 集中设置权限。所有程序功能代码都放在这里,菜单和空间的action设置相应的Action 把actions的序号和名称预置到数据库表—功能模块中即可。这样程序以后增加功能只需在数据库表中增加模块id和模块名称就行了,不需要修改权限代码。 在FormActivate执行权限设置代码 程序其他代码删除 程序缺点:没实现树形结构,Actions循序不能随便更改,改了以后需要更改数据库表。 欢迎高手指点。
【文件预览】:
组权限设置
----czyb.~dpr(546B)
----czyb.cfg(434B)
----login.pas(3KB)
----main.~ddp(51B)
----data.~ddp(51B)
----czyb.exe(1.43MB)
----czyb_data.mdb(292KB)
----data.pas(1KB)
----useredit.pas(5KB)
----useredit.dcu(9KB)
----login.~pas(3KB)
----czyb.res(26KB)
----czyb.dof(2KB)
----main.dcu(14KB)
----main.dfm(276KB)
----main.pas(8KB)
----login.ddp(51B)
----login.dfm(4KB)
----pass.dcu(5KB)
----pass.dfm(2KB)
----login.~dfm(4KB)
----qxfp.pas(3KB)
----main.~pas(8KB)
----login.dcu(7KB)
----data.~dfm(66KB)
----pass.pas(1KB)
----qxfp.ddp(51B)
----czyb.dpr(546B)
----data.ddp(51B)
----useredit.dfm(7KB)
----data.dfm(4KB)
----pass.ddp(51B)
----qxfp.dfm(6KB)
----main.~dfm(276KB)
----useredit.ddp(51B)
----main.ddp(51B)
----data.~pas(24KB)
----data.dcu(3KB)
----qxfp.dcu(7KB)
----login.~ddp(51B)
----readme.txt(566B)