RibbonBar Tabs Font Problem
Printed From: Codejock Forums
Category: Codejock Products
Forum Name: Command Bars
Forum Description: Topics Related to Codejock Command Bars
URL: http://forum.codejock.com/forum_posts.asp?TID=5929
Printed Date: 19 June 2025 at 11:38pm
Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com
Topic: RibbonBar Tabs Font Problem
Posted By: DDJJ
Subject: RibbonBar Tabs Font Problem
Date Posted: 28 December 2006 at 11:29am
|
With 10.4, our ribbonbar fonts got out of wack. Under prior versions, we really didn't have any specific code to set the fonts...we were happy with the Tahoma, size 8. We can now get virtually all of the fonts to work using the following code, EXCEPT for the ribbonbar tabs.
Can anyone tell me how to change the following to get the fonts to work on the tabs? (Also, we tried the RibbonBar.TabPaintManager...didn't work).
With CommandBars1
.VisualTheme = xtpThemeRibbon
.Options.SetIconSize True, 32, 32 .Icons = frmMain.ImageManager2.Icons .Options.UseDisabledIcons = True .Options.IconsWithShadow = True .Options.OfficeStyleDisabledIcons = True .Options.LunaColors = False .Options.ToolBarAccelTips = True End With Set RibbonBar = CommandBars1.AddRibbonBar("The Ribbon Bar")
RibbonBar.EnableDocking xtpFlagStretched RibbonBar.EnableFrameTheme RibbonBar.Closeable = False RibbonBar.Customizable = False RibbonBar.ShowQuickAccess = False Set ControlFile2 = RibbonBar.AddSystemButton()
ControlFile2.IconId = 3000 Set RibbonBar = CommandBars1.ActiveMenuBar RibbonBar.CommandBars.Options.Font.Name = "Tahoma"
RibbonBar.CommandBars.Options.Font.Size = 8 RibbonBar.CommandBars.Options.ComboBoxFont.Name = "Tahoma" RibbonBar.CommandBars.Options.ComboBoxFont.Size = 8 RibbonBar.RibbonPaintManager.CaptionFont.Name = "Tahoma"
RibbonBar.RibbonPaintManager.CaptionFont.Size = 8 Dim TextFont As StdFont
Set TextFont = New StdFont TextFont.Name = "Tahoma" TextFont.Size = 8 Set RibbonBar.TabPaintManager.Font = TextFont
|
Replies:
Posted By: DDJJ
Date Posted: 03 January 2007 at 12:00pm
|
I'll try again... Our app uses various CommandBar RibbonBars on multiple forms. Is there a way to set the font name and size for all RibbonBar control elements (tabs, controls, groups) globally? If not globally, how? We're are applying the various Office2007 color themes (the same way done in the RibbonBar sample) and can get everything but the RibbonBar tab fonts to work.
Dan
|
Posted By: Oleg
Date Posted: 04 January 2007 at 2:38am
|
Hello,
I tried
Dim TextFont As StdFont
Set TextFont = New StdFont TextFont.Name = "Tahoma" TextFont.Size = 12 Set RibbonBar.TabPaintManager.Font = TextFont and it works - I see large font in Tabs. May be you set it before you set Ribbon visual theme? ------------- Oleg, Support Team CODEJOCK SOFTWARE SOLUTIONS |
Posted By: DDJJ
Date Posted: 04 January 2007 at 11:40am
|
Tried setting before visual theme--doesn't work.
Can get to work in RibbonBar sample. Have tried setting properties using the order shown in the sample, still no luck.
If it helps, here's an image showing what the ribbonbar looks like in our app (with tab fonts larger than all other fonts):
 |
Posted By: Oleg
Date Posted: 04 January 2007 at 3:02pm
|
Hi,
May be you call RibbonBar.FontHeight = 8 somewhere after you changed font of tabs. Try to move it before you call it. ------------- Oleg, Support Team CODEJOCK SOFTWARE SOLUTIONS |
Posted By: DDJJ
Date Posted: 04 January 2007 at 5:21pm
|
Wasn't using the FontHeight property anywhere in code. Tried using here...it doesn't help. At this point, the only code I'm using for fonts is:
CommandBars1.Options.ComboBoxFont.Name = "Tahoma"
CommandBars1.Options.ComboBoxFont.Size = 8 CommandBars1.Options.Font.Name = "Tahoma" CommandBars1.Options.Font.Size = 8 RibbonBar.TabPaintManager.Font.Name = "Tahoma" RibbonBar.TabPaintManager.Font.Size = 8 RibbonBar.RibbonPaintManager.CaptionFont.Name = "Tahoma" RibbonBar.RibbonPaintManager.CaptionFont.Size = 8 RibbonBar.RecalcLayout
RibbonBar.RedrawBar Same result..can't get tab font to change.
|
Posted By: DDJJ
Date Posted: 04 January 2007 at 5:23pm
Move what before I call it?
|
oleg wrote:Posted By: jcollier
Date Posted: 04 January 2007 at 5:46pm
|
I tried setting RibbonBar.FontHeight = 8 instead of RibbonBar.TabPaintManager.Font.Size = 8 and it seems to work Using FontHeight sets all fonts on the ribbonbar to the same height. Using .Font.Size only sets the height of the fonts on the tabs. |
Posted By: DDJJ
Date Posted: 04 January 2007 at 7:10pm
|
I tried using only RibbonBar.FontHeight = 8. Regardless of whether I use 6,7,8,9,10,12,or 14 for the property, the RibbonBar always looks the same (I'm guessing about a font size of 10). Made sure I commented out any other code relating to fonts. |
Posted By: Oleg
Date Posted: 05 January 2007 at 2:09am
|
Hi,
Actually we agree that the font size become larger with 10.4 if Sergoe UI font was not installed. It will be jfixed in 10.4.1. ------------- Oleg, Support Team CODEJOCK SOFTWARE SOLUTIONS |
Posted By: DDJJ
Date Posted: 05 January 2007 at 9:29am
|
That doesn't explain why we are able to change font sizes using the RibbonBar sample, but not our app (on the same development machine).
We are trying to get an update released for our app by Jan 15th, so if anyone can suggest a workaround until 10.4.1 is released, it would be appreciated.
Dan
|
Posted By: DDJJ
Date Posted: 05 January 2007 at 11:02am
|
FYI, I am able to get the tab font sized reduced by adding a command button to run the following code AFTER our form loads:
CommandBars1.Options.ComboBoxFont.Name = "Tahoma"
CommandBars1.Options.ComboBoxFont.Size = 8 CommandBars1.Options.Font.Name = "Tahoma" CommandBars1.Options.Font.Size = 8 RibbonBar.TabPaintManager.Font.Name = "Tahoma" RibbonBar.TabPaintManager.Font.Size = 8 RibbonBar.RibbonPaintManager.CaptionFont.Name = "Tahoma" RibbonBar.RibbonPaintManager.CaptionFont.Size = 8 RibbonBar.RecalcLayout
RibbonBar.RedrawBar However, this creates another problem...RibbonBar controls with two lines of text end up having the second line start to move off the ribbonbar (looks like both the icon and the text move down a little bit).
Also, whenever I change the theme style (black, aqua, blue or silver), I need to hit the command button to get the tab font corrected.
Dan
|
Posted By: Oleg
Date Posted: 05 January 2007 at 1:05pm
|
Hello,
Create new issue I will send you 10.4.1 to test. ------------- Oleg, Support Team CODEJOCK SOFTWARE SOLUTIONS |
Posted By: DDJJ
Date Posted: 05 January 2007 at 1:12pm
| Thanks, Oleg. I just created issue. |