以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]如何设置主菜单标题的颜色和大小？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=104857)
--  作者：hrw68529
--  发布时间：2017/8/7 8:32:00
--  [求助]如何设置主菜单标题的颜色和大小？
想把主菜单的标题字体和颜色进行更改，如何做呢
--  作者：有点甜
--  发布时间：2017/8/7 8:48:00
--  

菜单修改，参考。

 

lockbasemainform
Dim a As C1Ribbon.C1Ribbon = BaseMainForm.controls("C1Ribbon1")
a.VisualStyle = 0
a.RibbonStyle.ColorSet(C1.Win.C1Ribbon.StyleColor.TabBackground) = Color.Bisque
a.RibbonStyle.ColorSet(C1.Win.C1Ribbon.StyleColor.FormBackground) = Color.LightSkyBlue
a.RibbonStyle.ConstSet(C1.Win.C1Ribbon.StyleConst.ContentAreaHeight) = 100
a.font = new font("黑体", 10)
unlockbasemainform

[此贴子已经被作者于2017/8/7 8:51:11编辑过]
--  作者：有点甜
--  发布时间：2017/8/7 8:49:00
--  
如果指的是窗口顶部的标题，那个是不能改的。
--  作者：有点甜
--  发布时间：2017/8/7 8:54:00
--  

菜单所有属性

 

Dim obj = CType(BaseMainForm,C1Ribbon.C1RibbonForm).Ribbon

obj.ForeColorOuter = color.red

\'For Each o As object In obj.Gettype.getproperties
\'    output.show(o.name)
\'Next

 

---------------------------------------------------------------------

 

ApplicationMenu
ApplicationMenuHolder
Qat
QatHolder
ConfigToolBar
ConfigToolBarHolder
TopToolBar
TopToolBarHolder
BottomToolBar
BottomToolBarHolder
PermanentIDs
QatItemsHolder
ContextMenuItems
AllowContextMenu
AllowMinimize
HideAppMenuWithTHR
HideTabHeaderRow
RestrictedGroupSizing
Minimized
MinimumWidth
MinimumHeight
TabPopupWidth
Selectable
SupportsKeyTips
AltKeyPressDelay
CaptureF10Key
CaptureAltKeyInTerminalSession
NoSysKeyUp
KeyTipsVisible
HotTransitionEffect
FontPadding
ForeColorDisabled
ForeColorInner
ForeColorMenuItem
ForeColorOuter
ForeColorTextBox
ToolTipMaxWidth
CaptionAlignment
ChildCaptionInSquareBrackets
HeaderWatermark
SmallImageList
LargeImageList
VisualStyle
RibbonStyle
ToolTipSettings
Tabs
ContextualTabGroups
SelectedTab
SelectedTabIndex
QatItemNames
QatItemIDs
TextRenderingHint
Visible
Location
Size
Padding
Anchor
AutoSize
MaximumSize
MinimumSize
ForeColor
BackColor
BackgroundImage
BackgroundImageLayout
BorderStyle
Cursor
Dock
TabStop
TabIndex
ScrollBars
ScrollPosition
ScrollSize
ScrollTrack
Text
ScrollableRectangle
AccessibilityObject
AccessibleDefaultActionDescription
AccessibleDescription
AccessibleName
AccessibleRole
AllowDrop
AutoScrollOffset
LayoutEngine
BindingContext
Bottom
Bounds
CanFocus
CanSelect
Capture
CausesValidation
ClientRectangle
ClientSize
CompanyName
ContainsFocus
ContextMenu
ContextMenuStrip
Controls
Created
DataBindings
DisplayRectangle
IsDisposed
Disposing
Enabled
Focused
Font
Handle
HasChildren
Height
IsHandleCreated
InvokeRequired
IsAccessible
IsMirrored
Left
Margin
Name
Parent
ProductName
ProductVersion
RecreatingHandle
Region
Right
RightToLeft
Site
Tag
Top
TopLevelControl
UseWaitCursor
Width
WindowTarget
PreferredSize
ImeMode
Container