以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  请教专家，求代码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=48773)
--  作者：xrrzzy5
--  发布时间：2014/4/4 16:58:00
--  请教专家，求代码
在"窗口1"中的控件绑定了表A中的各列字段，要求当表A中的对应行锁定时，窗口控件的背景为灰色，表A中的行解锁后背景又变白色，该如何实现？求老师指导！
--  作者：有点甜
--  发布时间：2014/4/4 17:05:00
--  

 要编写几个事件的代码，代码如下

 

If currentTable.current.Locked then

    Forms("xxx").Controls("xxxx").BackColor = Color.Gray

Else

    Forms("xxx").Controls("xxxx").BackColor = Color.White

End If

 

 要写代码的事件

 

CurrentChanged

DataRowLockedChanged

 
--  作者：xrrzzy5
--  发布时间：2014/4/4 17:27:00
--  
多谢，完成了。