以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如何设置表中选中行最左侧序号的颜色？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=120208)
--  作者：新福星
--  发布时间：2018/6/9 18:08:00
--  [求助]如何设置表中选中行最左侧序号的颜色？
用程序设置一个表的系统样式。怎么设置选中行的最左侧序号字体的颜色？
--  作者：有点甜
--  发布时间：2018/6/10 23:41:00
--  
For Each tb As Table In Tables
   
    tb.UseVisualStyle = False \'关闭系统界面风格,否则部分设置不起作用
   
    tb.Grid.Styles("UnchangedRowHeader").ForeColor = Color.White \'行号字体颜色
   
    tb.Grid.Styles("UnchangedRowHeader").BackColor = color.Black \'行号背景颜色
    tb.Grid.Styles("AddedRowHeader").font = new font("宋体", 15)
    tb.Grid.Styles("ModifiedRowHeader").font = new font("宋体", 15)
    tb.Grid.Styles("UnchangedRowHeader").font = new font("宋体", 15)
   
   
Next
--  作者：新福星
--  发布时间：2018/6/11 5:12:00
--  

 

在调整了表的配色之后,选中当前行,序号就被遮盖住了。怎么解决？改成白色当前行也是这样，无法显示出来！谢谢


图片点击可在新窗口打开查看此主题相关图片如下：qq截图20180611050743.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2018/6/11 5:11:59编辑过]
--  作者：有点甜
--  发布时间：2018/6/11 8:47:00
--  

比如

 

For Each tb As Table In Tables
   
    tb.UseVisualStyle = False \'关闭系统界面风格,否则部分设置不起作用
   
    tb.Grid.Styles("UnchangedRowHeader").ForeColor = Color.White \'行号字体颜色
   
    tb.Grid.Styles("UnchangedRowHeader").BackColor = color.Black \'行号背景颜色
    tb.Grid.Styles("AddedRowHeader").font = new font("宋体", 15)
    tb.Grid.Styles("ModifiedRowHeader").font = new font("宋体", 15)
    tb.Grid.Styles("UnchangedRowHeader").font = new font("宋体", 15)

    tb.grid.styles.selectedRowHeader.font = new font("宋体", 20)
   
Next