Foxtable(狐表)用户栏目专家坐堂 → 窗口可以利用菜单编辑器吗?


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

主题:窗口可以利用菜单编辑器吗?

帅哥哟,离线,有人找我吗?
wukangppbb
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:371 积分:2672 威望:0 精华:0 注册:2020/7/24 10:30:00
窗口可以利用菜单编辑器吗?  发帖心情 Post By:2022/3/7 11:13:00 [只看该作者]


窗口可以利用菜单编辑器吗?


图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20220307111139.png
图片点击可在新窗口打开查看


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


加好友 发短信
等级:超级版主 帖子:110649 积分:563159 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/3/7 11:21:00 [只看该作者]

没看懂,请详细说明一下

 回到顶部
帅哥哟,离线,有人找我吗?
wukangppbb
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:371 积分:2672 威望:0 精华:0 注册:2020/7/24 10:30:00
模式窗口控制  发帖心情 Post By:2022/3/7 11:24:00 [只看该作者]

就是新增了一个模式窗口,这个模式窗口可以使用菜单编辑器新增一些菜单,用于控制模式窗口的一些操作吗?

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


加好友 发短信
等级:超级版主 帖子:110649 积分:563159 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/3/7 11:26:00 [只看该作者]

当然可以了,菜单编辑器不就是做这种工作的吗: http://www.foxtable.com/webhelp/topics/3108.htm

 回到顶部
帅哥哟,离线,有人找我吗?
wukangppbb
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:371 积分:2672 威望:0 精华:0 注册:2020/7/24 10:30:00
事件  发帖心情 Post By:2022/3/7 11:29:00 [只看该作者]

那菜单按钮所对应的事件我是写在窗口事件还是表事件里面的?

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


加好友 发短信
等级:超级版主 帖子:110649 积分:563159 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/3/7 11:33:00 [只看该作者]

参考:http://www.foxtable.com/webhelp/topics/3112.htm

建议把【窗口中的菜单】这章内容先完整看一遍

 回到顶部
帅哥哟,离线,有人找我吗?
wukangppbb
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:371 积分:2672 威望:0 精华:0 注册:2020/7/24 10:30:00
某一行被禁用后怎么标记?  发帖心情 Post By:2022/3/8 15:38:00 [只看该作者]

用代码对某一行进行禁用后怎么突出显示显示此行已被禁用编辑?

Case "模块禁用"
        If MessageBox.Show("是否禁用?","确认",MessageBoxButtons.OKCancel,MessageBoxIcon.Question) =DialogResult.OK Then
            Tables("模块").Current.DataRow.Locked  = True
        End If


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


加好友 发短信
等级:超级版主 帖子:110649 积分:563159 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/3/8 15:39:00 [只看该作者]

到drawcell事件处理:http://www.foxtable.com/webhelp/topics/0656.htm

判断行锁定的显示一种样式

 回到顶部
帅哥哟,离线,有人找我吗?
wukangppbb
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:371 积分:2672 威望:0 精华:0 注册:2020/7/24 10:30:00
这么写完以后整个页面都用了样式,是不是不对?  发帖心情 Post By:2022/3/8 16:05:00 [只看该作者]

这么写完以后整个页面都用了样式,是不是不对?
If Tables("模块").Current.DataRow.Locked  = True Then
    e.Style = "被锁定"
End If

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


加好友 发短信
等级:超级版主 帖子:110649 积分:563159 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/3/8 16:29:00 [只看该作者]

If e.Row.Locked  = True Then
    e.Style = "被锁定"
End If

 回到顶部
总数 12 1 2 下一页