Foxtable(狐表)用户栏目专家坐堂 → [求助]自定义菜单下重复填充失效


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

主题:[求助]自定义菜单下重复填充失效

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


加好友 发短信
等级:三尾狐 帖子:682 积分:5388 威望:0 精华:0 注册:2015/1/23 0:31:00
[求助]自定义菜单下重复填充失效  发帖心情 Post By:2020/5/2 17:09:00 [只看该作者]

在全局代码或者表代码中加入下面这段代码都按Ctrl+d 都还是不起作用
在项目事件Initialize对所有表都启用了的
If e.keycode = Keys.D AndAlso e.control = True Then
    For i As Integer = e.Table.topposition + 1 To e.Table.bottomposition
        e.Table.rows(i)(e.Table.colsel) = e.Table.rows(i-1)(e.Table.colsel)
    Next
    e.cancel = True
End If

 回到顶部
帅哥,在线噢!
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47480 积分:251289 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2020/5/3 8:52:00 [只看该作者]

foxtable本身就有这个功能了,不需要自己写。

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


加好友 发短信
等级:三尾狐 帖子:682 积分:5388 威望:0 精华:0 注册:2015/1/23 0:31:00
回复:(狐狸爸爸)foxtable本身就有这个功能了,不需...  发帖心情 Post By:2020/5/3 17:01:00 [只看该作者]

我采用自定义菜单了,没有用系统菜单,所以没有这个功能了

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


加好友 发短信
等级:五尾狐 帖子:1093 积分:6682 威望:0 精华:0 注册:2013/7/1 9:05:00
  发帖心情 Post By:2020/5/4 8:36:00 [只看该作者]

Ctrl+D可能被Foxtable自己检测用了, 你将D改为E看看

If e.keycode = Keys.D AndAlso e.control = True Then
    For i As Integer = e.Table.topposition + 1 To e.Table.bottomposition
        e.Table.rows(i)(e.Table.colsel) = e.Table.rows(i-1)(e.Table.colsel)
    Next
    e.cancel = True
End If

另外常规的表你可以在Initialize开启全局事件,窗口表是不会的。

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


加好友 发短信
等级:三尾狐 帖子:682 积分:5388 威望:0 精华:0 注册:2015/1/23 0:31:00
回复:(有点酸)Ctrl+D可能被Foxtable自己检测用了,...  发帖心情 Post By:2020/5/8 16:13:00 [只看该作者]

换一个就可以了,有没有办法设置为Ctrl+D,都习惯用这个快捷键

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


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

没有办法。

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


加好友 发短信
等级:三尾狐 帖子:760 积分:5430 威望:0 精华:0 注册:2012/10/5 21:53:00
  发帖心情 Post By:2020/6/9 16:24:00 [只看该作者]

 在自定义菜单里面新建一个标准按钮,按钮设置快捷方式为Ctrl+D,默认不可见,按钮事件为Syscmd.Edit.RepeatFill()然后重新打开,自定义菜单下,窗口表中的ctrl+d重复填充即可用了

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


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

测试了一下貌似没有效果。改为其它快捷键就可以

 回到顶部