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


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

主题:窗口表权限

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望: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


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望: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


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

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

按4楼的方法调试,不起作用的时候弹出什么内容?

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

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

 回到顶部
帅哥,在线噢!
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

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

窗口的表格控件和普通表格一样,需要到表事件处理:http://www.foxtable.com/webhelp/topics/2255.htm

 回到顶部