以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  怎么更换菜单中的标签组件的字体、颜色、字号(已解决)  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=58774)

--  作者:temblar
--  发布时间:2014/10/23 14:32:00
--  怎么更换菜单中的标签组件的字体、颜色、字号(已解决)

怎么更换菜单中的 标签 组件的字体、颜色、字号?如下图的万达广场这个label组件


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

首先感谢有点甜的帮助,此问题通过更换思路解决如下:

窗口增加painter控件,便于进行系统设置时任意更改

gdi画文字后保存至projectpath & "\\images\\XXX.png"

RibbonTabs("功能区1").Groups("功能组1").Items("标签2").SmallImage = getimage("XXX.png")

仅供参考

[此贴子已经被作者于2014-10-29 9:41:08编辑过]

--  作者:有点甜
--  发布时间:2014/10/23 14:39:00
--  
 

Dim a As object = BaseMainForm.controls("C1Ribbon1")

a.Tabs("功能区1").Groups("功能组1").Items("标签1").Font = new font("黑体", 10)
a.Tabs("功能区1").Groups("功能组1").Items("标签1").ForeColorInner = Color.red


--  作者:temblar
--  发布时间:2014/10/23 15:24:00
--  

谢谢有点甜! 但是在命令窗口运行提示如下错误


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

--  作者:有点甜
--  发布时间:2014/10/23 15:25:00
--  
 菜单名称要写对,而且要切换到你自己的菜单。
--  作者:temblar
--  发布时间:2014/10/23 15:32:00
--  

高度能变么


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


--  作者:有点甜
--  发布时间:2014/10/23 15:32:00
--  
 不能。