以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  菜单功能组名称的字体怎么设置?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=154714)

--  作者:andy-1024
--  发布时间:2020/9/24 16:00:00
--  菜单功能组名称的字体怎么设置?

老师好,我之前按照下面的代码设置的菜单栏字体,显示是正常的。

 

Dim obj As object = BaseMainForm.controls("C1Ribbon1")
obj.font = new font("tahoma", 10)
Dim a As C1Ribbon.C1Ribbon = BaseMainForm.controls("C1Ribbon1")
a.AllowContextMenu = False

 

不知道从哪一次升级开始,菜单栏功能组名称的字体就变了,像下面图片中黄色处一样了:


图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看

 

请问老师,应该怎么修改,才能让功能组名称和我需要的字体一致?


--  作者:有点蓝
--  发布时间:2020/9/24 16:18:00
--  
Dim obj As object = BaseMainForm.controls("C1Ribbon1")
For Each m As object In obj.Tabs
    m.font = new font("tahoma", 10)
Next

--  作者:andy-1024
--  发布时间:2020/9/24 16:29:00
--  

刚试过了,加入上面的代码,结果显示和原来是一样的,字体没有变化呀。


--  作者:有点蓝
--  发布时间:2020/9/24 16:38:00
--  
需要把菜单样式改为“Foxtable经典X”