Foxtable(狐表)用户栏目专家坐堂 → 关于控件背景颜色怎么随绑定值变化


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

主题:关于控件背景颜色怎么随绑定值变化

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


加好友 发短信
等级:婴狐 帖子:8 积分:157 威望:0 精华:0 注册:2012/4/14 9:46:00
关于控件背景颜色怎么随绑定值变化  发帖心情 Post By:2012/4/20 14:20:00 [只看该作者]

求高手帮忙,我想让窗口的lable控件的背景颜色,随着lable绑定值变化,这个判断语句怎么写,目前只能做到固定颜色,无法随值判定变化
 例如:Forms("故障报修弹出窗口").controls("Label8").backcolor = color.green   这个可以实现

但是要判断lable绑定的列 "设备状态"栏的数值变化时,无法执行,求高手帮忙修改代码:



If Forms("故障报修弹出窗口").controls("Label8").BindingField ("故障报修弹出窗口.设备状态").value="待修中" Then
Forms("故障报修弹出窗口").controls("Label8").backcolor = color.green
End If

 回到顶部
帅哥,在线噢!
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/4/20 16:05:00 [只看该作者]

设置Table的CurrentChanged事件:

 

If Forms("故障报修弹出窗口").Opened then

      Dim r as Row = e.Table.Current

      if r("设备状态") = "待修中" then

            Forms("故障报修弹出窗口").controls("Label8").backcolor = color.green

      else

          Forms("故障报修弹出窗口").controls("Label8").backcolor = color.Red

      End If

End if


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


加好友 发短信
等级:婴狐 帖子:8 积分:157 威望:0 精华:0 注册:2012/4/14 9:46:00
  发帖心情 Post By:2012/4/20 17:02:00 [只看该作者]

感谢版主的帮助,终于解决这个问题。

'故障报修弹出窗口设备状态背景颜色转换
If Forms("故障报修弹出窗口").Opened Then
    Dim r As DataRow = e.DataRow
    If r("设备状态") = "待修中" Then
        Forms("故障报修弹出窗口").controls("Label8").backcolor = color.red
    Else If r("设备状态") = "维修中" Then
        Forms("故障报修弹出窗口").controls("Label8").backcolor = color.fuchsia
    Else If r("设备状态") = "运行中" Then
        Forms("故障报修弹出窗口").controls("Label8").backcolor = color.lime
    End If
End If

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


加好友 发短信
等级:婴狐 帖子:8 积分:157 威望:0 精华:0 注册:2012/4/14 9:46:00
  发帖心情 Post By:2012/4/21 7:45:00 [只看该作者]

还有个问题啊,我在切换行的时候,怎么这个时候颜色不会自动切换啊,是不是程序加载位置不对,求指教。

 回到顶部
帅哥,在线噢!
狐狸爸爸
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/4/23 7:22:00 [只看该作者]

你还得在Table的CurrentChanged事件设置代码,注意CurrentChanged事件的e参数和DataColChanged事件是不同的。

CurrentChanged事件是换行后执行的,DataColChanged是修改某列的值后执行的。

这种问题最好配合简单的例子后发帖提问。


 回到顶部