以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  禁止Table筛选  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=103637)

--  作者:peibaomin
--  发布时间:2017/7/13 10:44:00
--  禁止Table筛选

窗体的Table表怎么用代码禁止右键“取消筛选”功能


--  作者:有点甜
--  发布时间:2017/7/13 10:47:00
--  

BeforeShowContextMenu 事件

 

ContextMenus("Cell").Items("UnFilter").Enabled = False


--  作者:裴保民
--  发布时间:2017/7/13 11:02:00
--  
我只是在这个窗体中执行禁止筛选行为在其他地方是允许筛选的。这样设置是不是这个表都这任何地方都不能筛选啦?我只是在该窗体中执行这个功能。
--  作者:有点甜
--  发布时间:2017/7/13 11:31:00
--  

CurrentTableChanged事件

 

If currentTable.Name = "表A" Then

    ContextMenus("Cell").Items("UnFilter").Enabled = False

Else

    ContextMenus("Cell").Items("UnFilter").Enabled = True

End If


--  作者:peibaomin
--  发布时间:2017/7/13 12:40:00
--  

不好意思刚才意思表达错误,我的意思是在窗体中执行禁止“取消筛选”的意思,不是禁止”筛选”


--  作者:裴保民
--  发布时间:2017/7/13 14:05:00
--  
就是让“取消筛选”快捷键失去作用


--  作者:有点甜
--  发布时间:2017/7/13 14:32:00
--  
以下是引用peibaomin在2017/7/13 12:40:00的发言:

不好意思刚才意思表达错误,我的意思是在窗体中执行禁止“取消筛选”的意思,不是禁止”筛选”

 

4楼代码没有问题。


--  作者:peibaomin
--  发布时间:2017/7/13 16:36:00
--  

怎么不管用呢?

 

 写的代码

 


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

 

选择“取消筛选”快捷键前



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


上传附件

 选择“取消筛选”快捷键后

 


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

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:提醒测试.table

[此贴子已经被作者于2017/7/13 16:52:03编辑过]

--  作者:xvkewen
--  发布时间:2017/7/13 16:53:00
--  

你的例子中窗口表与实际的Datatable是绑定的,即窗口中的表就是你项目中的表;

 

要想实现你的想法,把窗口表设为副本;然后用currentTable.Name = "窗口_table1"

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:提醒测试.table

[此贴子已经被作者于2017/7/13 16:55:50编辑过]

--  作者:peibaomin
--  发布时间:2017/7/13 17:04:00
--  
这样设计打开窗体后显示的是所有的数据,我想实现打开窗体后显示的是符合条件的数据,只是打开窗体后让快捷键“取消筛选”失去功能,意思是不让显示所有数据,只能显示刚打开窗体时的数据