以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  加载数据表,第一行自动解锁是为什么  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=144667)

--  作者:robin811219
--  发布时间:2019/12/26 15:37:00
--  加载数据表,第一行自动解锁是为什么
窗口中加载数据表的时候,表第一行总是自动解锁是为什么?能有什么原因导致这种现象?
--  作者:有点蓝
--  发布时间:2019/12/26 15:42:00
--  
么见过这种情况,一般由其他代码影响了,具体请上传实例说明
--  作者:robin811219
--  发布时间:2019/12/26 16:11:00
--  
窗口里的表是sqltable,我直接用datatable("窗口_表"").save()的方法保存的,经过测试,发现locked修改后,保存不上,是我对sqltable的保存理解有错误吗?


--  作者:robin811219
--  发布时间:2019/12/26 16:12:00
--  
而且只有locked保存不住,其他数据都能保存,是我对保存的概念理解的有误吗?


--  作者:有点蓝
--  发布时间:2019/12/26 16:33:00
--  
怎么做locked修改的,贴出完整代码说明
--  作者:robin811219
--  发布时间:2019/12/26 16:38:00
--  
With Tables("销售订单_出库明细")
    If .TopPosition > -1 Then \'如果选定区域包括数据行
        For i As Integer = .TopPosition To .BottomPosition
            If .Rows(i).Locked = False  Then
                .Rows(i).Locked = True
                .save()
            End If
        Next
    End If
End With

--  作者:有点蓝
--  发布时间:2019/12/26 16:44:00
--  
试试

With Tables("销售订单_出库明细")
    If .TopPosition > -1 Then \'如果选定区域包括数据行
        For i As Integer = .TopPosition To .BottomPosition
            If .Rows(i).Locked = False  Then
                .Rows(i).datarow("_Locked") = True
            End If
        Next
    End If
    .save()
End With