可能我上面没表达完整,主要还是如何判断当前行的状态是否处于新增、修改、保存三状态中的一种。
如:
1、当前行处于新增状态,还未保存。新增和修改按钮灰色,保存后新增、修改、删除亮色。
2、当前行处于修改状态,还未保存。新增、修改、删除灰色,保存亮色。保存后:新增、修改、删除亮色,保存灰色(因已保存)
7.146 RowState
3.19.4 传统编辑方式
有做行的状态说明和 ,但例子和要求的不一样。
按钮之间的逻辑有做:
If Tables("工程需求_订货主表").Current.DataRow.RowState <> DataRowState.added Then '如果当前行已经修改过
Dim xg As WinForm.Button =Forms("工程需求").Controls("修改")
xg.Enabled =False
Dim bc As WinForm.Button =Forms("工程需求").Controls("保存")'无锁时保存起作用
bc.Enabled =True
Dim xz As WinForm.Button =Forms("工程需求").Controls("主表新增")
xz.Enabled =False
Else
Dim xz As WinForm.Button =Forms("工程需求").Controls("主表新增")
xz.Enabled =True
End If