以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]列标题颜色  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=183612)

--  作者:qq51837000
--  发布时间:2022/11/9 10:35:00
--  [求助]列标题颜色
Dim t As Table = CurrentTable
Dim LM As RibbonMenu.ComboBox = RibbonTabs("功能区1").Groups("功能组1").Items("组合框1")

If LM.Text <> Nothing Then
    t.SetHeaderCellBackColor(lm.Text, e.ColorPicker.Color)
End If

我在菜单中加了个修改列标题背景颜色的功能,但这个功能一旦修改了颜色就回不到默认颜色了,请问如何增加一个恢复默认颜色的设置?

--  作者:有点蓝
--  发布时间:2022/11/9 10:42:00
--  
没有办法直接恢复,如果是默认的主题,默认是系统控件色

t.SetHeaderCellBackColor("日期", SystemColors.Control)

如果是其它主题,自己使用拾色器看看是什么颜色