RibbonBar Tabs Font Problem |
Post Reply |
Author | |
DDJJ
Senior Member Joined: 13 December 2004 Status: Offline Points: 143 |
Post Options
Thanks(0)
Posted: 05 January 2007 at 1:12pm |
Thanks, Oleg. I just created issue.
|
|
Oleg
Admin Group Joined: 21 May 2003 Location: United States Status: Offline Points: 11234 |
Post Options
Thanks(0)
|
Hello,
Create new issue I will send you 10.4.1 to test.
|
|
Oleg, Support Team
CODEJOCK SOFTWARE SOLUTIONS |
|
DDJJ
Senior Member Joined: 13 December 2004 Status: Offline Points: 143 |
Post Options
Thanks(0)
|
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
|
|
DDJJ
Senior Member Joined: 13 December 2004 Status: Offline Points: 143 |
Post Options
Thanks(0)
|
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
|
|
Oleg
Admin Group Joined: 21 May 2003 Location: United States Status: Offline Points: 11234 |
Post Options
Thanks(0)
|
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 |
|
DDJJ
Senior Member Joined: 13 December 2004 Status: Offline Points: 143 |
Post Options
Thanks(0)
|
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. |
|
jcollier
Senior Member Joined: 15 February 2006 Status: Offline Points: 250 |
Post Options
Thanks(0)
|
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. |
|
DDJJ
Senior Member Joined: 13 December 2004 Status: Offline Points: 143 |
Post Options
Thanks(0)
|
Move what before I call it?
|
|
DDJJ
Senior Member Joined: 13 December 2004 Status: Offline Points: 143 |
Post Options
Thanks(0)
|
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.
|
|
Oleg
Admin Group Joined: 21 May 2003 Location: United States Status: Offline Points: 11234 |
Post Options
Thanks(0)
|
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 |
|
DDJJ
Senior Member Joined: 13 December 2004 Status: Offline Points: 143 |
Post Options
Thanks(0)
|
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):
|
|
Oleg
Admin Group Joined: 21 May 2003 Location: United States Status: Offline Points: 11234 |
Post Options
Thanks(0)
|
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 |
|
DDJJ
Senior Member Joined: 13 December 2004 Status: Offline Points: 143 |
Post Options
Thanks(0)
|
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
|
|
DDJJ
Senior Member Joined: 13 December 2004 Status: Offline Points: 143 |
Post Options
Thanks(0)
|
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
|
|
Post Reply | |
Tweet
|
Forum Jump | Forum Permissions You cannot post new topics in this forum You cannot reply to topics in this forum You cannot delete your posts in this forum You cannot edit your posts in this forum You cannot create polls in this forum You cannot vote in polls in this forum |