【结帖】功能权限的问题[问题]**

新来小职员

窗体A中有窗体B的链接，但是张三只有A的权限没有B的权限，请问改如何去限制张三的权限，使他不能使用B功能？

lixy

用系统核心库的
function TFuncManager.RunFunc(AContext: TContext; AFuncItem: TOperatorFuncItem; const AParams, AUniqueID: string; BeforeRunFunc: TFuncNotifyEvent; Modal: Boolean): TFunc;
const
  ErrMsg = '当前操作者不具备运行该功能的权限，请向管理员询问';
var
。。。。
这个会校验权限

Akon

楼主,你是什么版本的,我测试了一下,如果你张三没有B的权限,通过A功能调用B功能的话,他会提示没有权限的

新来小职员

回楼上版本2827，我做了个功能A,A上有个链接按钮链接B，点击按钮即使操作员没有权限也弹出B
另外lixy给的是实现的代码？

atiger

请问你说的是功能A和功能B吧
1、你在功能A怎么调用功能B的，
2、你是怎么控制张三没有运行功能B？是通过在组织机构上分配功能权限来控制吗？如果不是，你是怎么控制的

新来小职员

没错就是通过功能权限。
我做了一个导航图功能，该功能有一个链接B功能的按钮。

atiger

按钮上没有代码吗？
如果有怎么写？

新来小职员

我直接在按钮上show出B窗体

atiger

代码，我要代码，你是run的功能B，还是直接Show的窗体B，如果是前者就会检查功能权限，如果是后，就不检查功能权限。

新来小职员

SystemCore.TSystemCore.FuncManager.RunFunc(Context,'', 'Biz:\WICCWGL\QYXXJZGN.FUNC','', nil, true);