以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  关于禁止删除行  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=136523)

--  作者:jackchan120925
--  发布时间:2019/6/14 22:46:00
--  关于禁止删除行
我在全局事件
beforedeletedatarow
设置如下代码 

If user.name <> "开发者" Then
    e.Cancel=True
End If

为什么非开发者还是可以删除行

--  作者:有点蓝
--  发布时间:2019/6/14 23:01:00
--  
需要开启全局表事件:http://www.foxtable.com/webhelp/topics/0671.htm

这些属性都是逻辑型,如果要使某个全局表事件对该DataTable有效,只需将对应的属性设为True即可。
这些属性中,
只有CurrentChanged、PositionChanged、AfterSelChange、AfterSelRangeChange的默认值为True,这也就是为什么默认只有这四个全局表事件有效的原因。

例如要使全局表事件AfterEdit事件对表A有效,只需:

DataTables("表A").GlobalHandler.AfterEdit = True

要使全局表事件AfterEdit事件对所有表有效,只需:

For Each dt As DataTable In DataTables
    dt.GlobalHandler.AfterEdit
 = True
Next