Foxtable(狐表)用户栏目专家坐堂 → [求助]行锁定


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

主题:[求助]行锁定

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


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
[求助]行锁定  发帖心情 Post By:2014/8/7 15:05:00 [显示全部帖子]

在窗口中录入出库明细,录完一条明细后点保存按钮,代码为:
with tables("出库表")
   .Current.Locked = True
            .Current.Save
end with
这样的话当前行就会锁定,但是关闭窗口以后,刚才锁定的行会自动解锁,
窗口的AfterClose事件为:
DataTables("出库表").LoadFilter = "_Identify Is NULL"
DataTables("出库表").Load
DataTables("出库表").AllowEdit = False

BeforeClose事件为:
Dim hasSave As Boolean = True
For Each r As Row In Tables("出库表").Rows
    If r.DataRow.RowState <> DataRowState.Unchanged Then
        hasSave = False
    End If
Next
If  not hasSave Then
    MessageBox.Show("请保存出库明细!", "提示", MessageBoxButtons.OK, MessageBoxIcon.Question)
    e.cancel  =True
End If
 
这些代码我测试过,都不会影响行锁定,另外表的表事件中也无与行锁定相关代码
请问各位大神,还可能什么地方对于行锁定有影响呢?
[此贴子已经被作者于2014-8-7 15:05:27编辑过]

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


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/8/7 15:12:00 [显示全部帖子]

外部数据源,不方便发

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


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/8/7 15:15:00 [显示全部帖子]

稍等哈

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


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/8/7 17:33:00 [显示全部帖子]

我查出原因了,就是在执行了DataTables("库存表").Load以后行锁定自动取消的

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


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/8/8 8:56:00 [显示全部帖子]

现在就是因为重新Load以后出的问题,做了内部数据源例子无法再现...
所以不知为何是这样,重新加载跟取消行锁定按说一点关系都没有啊

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


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/8/8 10:08:00 [显示全部帖子]

保存以后,_locked变为True,但如果点了查询或者关闭窗口(查询按钮和窗口的AfterClose事件都有datatables("出库表").load的代码),
在执行完load以后,_locked就变为了False。
全局表事件BeforeSaveDataRow中无代码

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


加好友 发短信
等级:一尾狐 帖子:452 积分:3015 威望:0 精华:0 注册:2014/4/23 17:12:00
  发帖心情 Post By:2014/8/8 10:39:00 [显示全部帖子]

不好意思啊,我之前表中没有加_locked列,您说了以后加了,但是程序没有重启所以说还是没效果,刚才重启了一下可以了...

 回到顶部