Foxtable(狐表)用户栏目专家坐堂 → 所有窗口表统一样色


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

主题:所有窗口表统一样色

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


加好友 发短信
等级:三尾狐 帖子:676 积分:7958 威望:0 精华:0 注册:2016/6/11 11:10:00
所有窗口表统一样色  发帖心情 Post By:2018/4/25 10:11:00 [显示全部帖子]

所有的窗口表都设定为统一的样式   请问代码如何写 
要求:一、表格样式--配色方案--当前行--背景颜色为LightCyan
二、表格样式--样式设置--网格线--颜色为Olive
三、整行
  非常感谢

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


加好友 发短信
等级:三尾狐 帖子:676 积分:7958 威望:0 精华:0 注册:2016/6/11 11:10:00
  发帖心情 Post By:2018/4/25 10:24:00 [显示全部帖子]

有点甜老师  按照你的提示那不是要一个一个表来设定 ?

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


加好友 发短信
等级:三尾狐 帖子:676 积分:7958 威望:0 精华:0 注册:2016/6/11 11:10:00
  发帖心情 Post By:2018/4/25 15:04:00 [显示全部帖子]

我把下面的代码放在窗口的AfterLoad里面,那么是不是每次打开这个窗口时都会执行这段代码

For Each zckt As Table In Tables

    zckt.Grid.Styles.Normal.Border.Color = Color.DarkOrange

    zckt.ListMode = True

Next

For Each zckdt As DataTable In DataTables

    zckdt.SysStyles("CurrentRow").BackColor = color.YellowGreen

Next

如果是的话,能不能对样式进行判断,如果窗口表当前的样式是代码要执行的颜色,则不执行代码,如果不是则执行。


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


加好友 发短信
等级:三尾狐 帖子:676 积分:7958 威望:0 精华:0 注册:2016/6/11 11:10:00
  发帖心情 Post By:2018/4/25 15:26:00 [显示全部帖子]

就是窗口中的副本表设定成上面代码的样式,代码是放到窗口的AfterLoad事件中,是不是每次打开窗口时都要执行这段代码?

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


加好友 发短信
等级:三尾狐 帖子:676 积分:7958 威望:0 精华:0 注册:2016/6/11 11:10:00
  发帖心情 Post By:2018/4/25 15:48:00 [显示全部帖子]

AfterLoad:
if  窗口1中所有副本表的网格颜色<>黑色 and 当前行<>红色   then 
 For Each zckt As Table In Tables

    zckt.Grid.Styles.Normal.Border.Color = 黑色

    zckt.ListMode = True

  Next

 For Each zckdt As DataTable In DataTables

    zckdt.SysStyles("CurrentRow").BackColor = 红色

 Next

end if

就是打开窗口1时如果窗口1中所有副本表的网格颜色不是黑色 and 当前行不是红色  则执行代码,如果副本表的网格颜色已经是黑色 and 当前行是红色,则不执行代码。 即对样式进行判断,不用每次Afterload都执行代码,提高运行速度,不知道这样表达,老师您能否明白。


 回到顶部