Foxtable(狐表) → 用户栏目 → 专家坐堂 → 窗口表权限


  共有7864人关注过本帖树形打印复制链接

主题：窗口表权限
帅哥哟，离线，有人找我吗？
有点蓝
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110738 积分：563610 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/7/27 15:06:00 [显示全部帖子]

If User.Name = "开发者" orelse User.Name =  "管理员" Then

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110738 积分：563610 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/7/27 16:04:00 [显示全部帖子]

调试

Dim ctl As WinForm.Control = e.Sender
msgbox(ctl.name & ": " & ctl.BindingField)
Select Case ctl.BindingField
    Case "资料数据汇总.布料材质", "资料数据汇总.排版图", "资料数据汇总.用量", "资料数据汇总.实裁用量", "资料数据汇总.排版说明"
msgbox(User.Name)
        If User.Name = "开发者" orelse User.Name =  "管理员" Then
msgbox(1)
            ctl.ReadOnly = BooleanEnum.False '允许编辑
        Else
msgbox(2)
            ctl.ReadOnly = BooleanEnum.True '禁止编辑
        End If
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110738 积分：563610 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/7/28 8:36:00 [显示全部帖子]

5楼截图的是窗口标题，不是窗口名称。

按4楼的方法调试，不起作用的时候弹出什么内容？
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110738 积分：563610 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/7/28 9:43:00 [显示全部帖子]

按4楼的方法调试，有问题的时候msgbox弹出什么内容？

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：110738 积分：563610 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2022/7/28 11:39:00 [显示全部帖子]

看来我们都理解错了。我以为您要控制文本框等的录入。如果要控制表格的编辑，不应该使用这种用法，这个是用来控制文本框等控件的录入的。.

窗口的表格控件和普通表格一样，需要到表事件处理：http://www.foxtable.com/webhelp/topics/2255.htm
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04492 秒, 5 次数据查询