以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何禁止 相关命令 的使用  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=188409)

--  作者:HBCHSTONE1
--  发布时间:2023/9/19 9:32:00
--  [求助]如何禁止 相关命令 的使用

各位大神:

  如何防止 工作表  被误删?

   日常工作  ----重置列     数据表----- 删除表      这两个命令如何禁用(怕不小心误删了)

 

 

请赐教!

 

20230919


--  作者:有点蓝
--  发布时间:2023/9/19 9:46:00
--  
http://www.foxtable.com/webhelp/topics/2438.htm
--  作者:HBCHSTONE1
--  发布时间:2023/9/19 11:35:00
--  

有点蓝老师:

 

附件里面的工作表:  《计价表》   由于操作人员容易产生误操作,如何禁止误删除?

 

你发的链接示例,我搞不好呀。

20230919

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:记价表20230910.table


--  作者:有点蓝
--  发布时间:2023/9/19 12:05:00
--  
怎么样才算误删除?怎么和正常的删除区分?

建议直接锁定不能编辑的行:http://www.foxtable.com/webhelp/topics/0111.htm,比如到datacolchanged事件判断,已经审核的行就锁定

--  作者:HBCHSTONE1
--  发布时间:2023/9/19 14:27:00
--  

有点蓝老师:

 

日常工作  ----删除行     (此命令经常使用)

数据表----- 删除表      这个命令如何禁用(怕不小心删除行时把工作表误删了)

 

以上两个命令的位置相近,操作人员很容易就会产生误删。(事实上已经两次误删了)

 

 另外重置列如何禁用?

 

 

20230919


--  作者:有点蓝
--  发布时间:2023/9/19 14:38:00
--  
看AfterOpenProject事件
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:记价表20230910.zip


--  作者:HBCHSTONE1
--  发布时间:2023/9/19 15:16:00
--  

以下是数据表区域  里面的  重置列   变灰的代码,那么 ,删除表又是如何的呀?  也就是说下面红色字体的Reset,换成哪一个单词就是禁用删除表?(我试过Delete是不对的,它显示不存在此组件)

 

If user.Type = UserTypeEnum.User  Then 

RibbonTabs("Table").Groups("Column").Items("Reset").Enabled = False

End If


--  作者:有点蓝
--  发布时间:2023/9/19 15:31:00
--  
看6楼

[此贴子已经被作者于2023/9/19 15:31:13编辑过]

--  作者:HBCHSTONE1
--  发布时间:2023/9/19 17:32:00
--  

If user.Type = UserTypeEnum.User  Then
RibbonTabs("Table").Groups("Column").Items("Reset").Enabled = False \'命令禁用。  将快捷菜单中的--数据表区下面的--列相关的--重置列--命令变灰。
RibbonTabs("Table").Groups("Table").Items("DeleteTable").Enabled = False \'命令禁用。  将快捷菜单中的--数据表区下面的--表相关的--删除表--命令变灰。
End If

 

 

以上代码全部搞定。