Foxtable(狐表)用户栏目专家坐堂 → 窗口中的表如何设置禁止粘贴?


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

主题:窗口中的表如何设置禁止粘贴?

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


加好友 发短信
等级:童狐 帖子:262 积分:2218 威望:0 精华:0 注册:2015/4/5 16:28:00
窗口中的表如何设置禁止粘贴?  发帖心情 Post By:2015/11/27 11:25:00 [只看该作者]

请教老师:

     用户窗口中的表如何设置禁止粘贴?因为用快捷方式Ctrl+v会把一些文字误粘到表中。


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/11/27 11:43:00 [只看该作者]

afterLoad事件

 

e.Form.TimerInterval = 100
e.Form.TimerEnabled = True

 

timerTick事件

 

If Forms.ActiveForm IsNot Nothing AndAlso forms.ActiveForm.tostring = e.form.tostring Then
    ClipBoard.Clear
End If


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


加好友 发短信
等级:童狐 帖子:262 积分:2218 威望:0 精华:0 注册:2015/4/5 16:28:00
  发帖心情 Post By:2015/11/27 12:14:00 [只看该作者]

上面的方法是清空了剪贴板,所有粘贴都不能进行了。

可我还想保留双击某单元格进行编辑状态时,能够粘贴,可以实现吗?


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/11/27 12:17:00 [只看该作者]

表格keydown事件

 

If e.Control = True AndAlso e.KeyCode = Keys.V Then
    e.Cancel = True
End If

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


加好友 发短信
等级:童狐 帖子:262 积分:2218 威望:0 精华:0 注册:2015/4/5 16:28:00
  发帖心情 Post By:2015/11/27 13:08:00 [只看该作者]

在系统窗口的表中可以,但在用户窗口中的副本表中还是能粘贴。

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


加好友 发短信
等级:童狐 帖子:262 积分:2218 威望:0 精华:0 注册:2015/4/5 16:28:00
  发帖心情 Post By:2015/11/27 14:33:00 [只看该作者]

在用户窗口中的副本表中还是能粘贴,如下图中的批准意见列。


图片点击可在新窗口打开查看此主题相关图片如下:无标题.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2015/11/27 14:37:18编辑过]

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


加好友 发短信
等级:童狐 帖子:262 积分:2218 威望:0 精华:0 注册:2015/4/5 16:28:00
  发帖心情 Post By:2015/11/27 14:48:00 [只看该作者]

好了,在table1的keydown事件中加同样代码,OK!

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


加好友 发短信
等级:童狐 帖子:262 积分:2218 威望:0 精华:0 注册:2015/4/5 16:28:00
  发帖心情 Post By:2015/11/27 14:49:00 [只看该作者]

谢谢老师!

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


加好友 发短信
等级:童狐 帖子:262 积分:2218 威望:0 精华:0 注册:2015/4/5 16:28:00
  发帖心情 Post By:2015/11/28 13:02:00 [只看该作者]

接上面的问题:

 

用户窗口中与表绑定的RecordGrid记录窗口如何同样实现禁止Ctrl+v粘贴?


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


加好友 发短信
等级:小狐 帖子:321 积分:1916 威望:0 精华:0 注册:2014/8/24 13:36:00
  发帖心情 Post By:2015/11/28 13:48:00 [只看该作者]

一样啊

 

到窗口的keydown事件中去加代码,判断一下是否是记录窗口


 回到顶部