Office2007White.dll |
Post Reply |
Author | |
McKloony
Senior Member Joined: 09 January 2007 Location: Germany Status: Offline Points: 340 |
Post Options
Thanks(0)
Posted: 06 March 2010 at 10:50am |
If I use Office2007Images = ...\Office2007White.dll in Windows XP everything is OK, but if I use it in Windows 7 the forecolor of the ribbon tabs is not shown correctly:
|
|
Product: Xtreme SuitePro (ActiveX) 16.2.5
Platform: XP / Windows 7 Language: Visual Basic 6.0 SP6 |
|
gibra
Senior Member Joined: 31 October 2008 Location: Italy Status: Offline Points: 288 |
Post Options
Thanks(0)
|
You intend to run compiled EXE application or running the source VBP project?
I have try a EXE "Ribbon MDI Sample" and colors are correct.
- Windows 7 Ultimate
- CodeJock 13.3.1
|
|
gibra
CJ SuiteControl v: 13.x to 19.x Windows 10 64bit VS2019 - VB6.0 SP6 <a href="http://nuke.vbcorner.net/Home/tabid/36/language/en-US/Default.aspx" rel="nofollow">VS/VB 6.0 Installer v6.8 |
|
McKloony
Senior Member Joined: 09 January 2007 Location: Germany Status: Offline Points: 340 |
Post Options
Thanks(0)
|
Yes, that's correct. If I switch from Office 2007 blue to white during runtime everything works fine. But if I want to s t a r t in Office 2007 white mode, it doesn't work under Windows 7
|
|
Product: Xtreme SuitePro (ActiveX) 16.2.5
Platform: XP / Windows 7 Language: Visual Basic 6.0 SP6 |
|
McKloony
Senior Member Joined: 09 January 2007 Location: Germany Status: Offline Points: 340 |
Post Options
Thanks(0)
|
If you change the original code of the ribbon sample to:
CommandBars.VisualTheme = xtpThemeRibbon
CommandBarsGlobalSettings.Office2007Images = App.Path & "\Styles\Office2007White.dll" in the CreateRibbon procedure, you will get the following ribbon:
|
|
Product: Xtreme SuitePro (ActiveX) 16.2.5
Platform: XP / Windows 7 Language: Visual Basic 6.0 SP6 |
|
gibra
Senior Member Joined: 31 October 2008 Location: Italy Status: Offline Points: 288 |
Post Options
Thanks(0)
|
Next changed style, you call below methods? CommandBars.PaintManager.RefreshMetrics
CommandBars.RecalcLayout I use this my function, to switch between styles:
Private Sub SetStyle(ByVal ControlID As Long)
Dim CommandBarsGlobalSettings As XtremeCommandBars.CommandBarsGlobalSettings
Set CommandBarsGlobalSettings = New XtremeCommandBars.CommandBarsGlobalSettings Select Case ControlID Case ID_STYLE_BLUE CommandBarsGlobalSettings.Office2007Images = App.Path & "\Office2007Blue.dll" Case ID_STYLE_BLACK CommandBarsGlobalSettings.Office2007Images = App.Path & "\Office2007Black.dll" Case ID_STYLE_WHITE CommandBarsGlobalSettings.Office2007Images = App.Path & "\Office2007White.dll" End Select CommandBars.PaintManager.RefreshMetrics CommandBars.RecalcLayout End Sub So I can change style in Execute method:
Private Sub CommandBars_Execute(ByVal Control As XtremeCommandBars.ICommandBarControl)
On Error Resume Next Select Case Control.Id Case ID_STYLE_BLUE, ID_STYLE_BLACK, ID_STYLE_WHITE SetStyle Control.Id <...>
End Sub
So, I can set style in Load event:
SetStyle ID_STYLE_WHITE
All work fine.
|
|
gibra
CJ SuiteControl v: 13.x to 19.x Windows 10 64bit VS2019 - VB6.0 SP6 <a href="http://nuke.vbcorner.net/Home/tabid/36/language/en-US/Default.aspx" rel="nofollow">VS/VB 6.0 Installer v6.8 |
|
McKloony
Senior Member Joined: 09 January 2007 Location: Germany Status: Offline Points: 340 |
Post Options
Thanks(0)
|
Product: Xtreme SuitePro (ActiveX) 16.2.5
Platform: XP / Windows 7 Language: Visual Basic 6.0 SP6 |
|
gibra
Senior Member Joined: 31 October 2008 Location: Italy Status: Offline Points: 288 |
Post Options
Thanks(0)
|
OK, now I have see.
As you already know, to work correctly, VB6 IDE need to activate the "Disable dektop composition" option (from Resources Explorer, right-clic in VB6.EXE -> Property -> Compatibility )
In fact, the project running from IDE work good.
If you disable this option for your EXE also, then EXE work fine.
I don't know if there is other way to solve the problem.
Probably this is a question for Codejock Support.
|
|
gibra
CJ SuiteControl v: 13.x to 19.x Windows 10 64bit VS2019 - VB6.0 SP6 <a href="http://nuke.vbcorner.net/Home/tabid/36/language/en-US/Default.aspx" rel="nofollow">VS/VB 6.0 Installer v6.8 |
|
McKloony
Senior Member Joined: 09 January 2007 Location: Germany Status: Offline Points: 340 |
Post Options
Thanks(0)
|
Yes, that's works. But for me it is a Bug in release 13.3.1 |
|
Product: Xtreme SuitePro (ActiveX) 16.2.5
Platform: XP / Windows 7 Language: Visual Basic 6.0 SP6 |
|
gibra
Senior Member Joined: 31 October 2008 Location: Italy Status: Offline Points: 288 |
Post Options
Thanks(0)
|
I don't think is a bug of Codejock release.
I think is a virtual-bug of VB6 in Windows7, because VB6 wasn't designed for Windows7 environment.
VB6 is very old tool...
|
|
gibra
CJ SuiteControl v: 13.x to 19.x Windows 10 64bit VS2019 - VB6.0 SP6 <a href="http://nuke.vbcorner.net/Home/tabid/36/language/en-US/Default.aspx" rel="nofollow">VS/VB 6.0 Installer v6.8 |
|
Oleg
Admin Group Joined: 21 May 2003 Location: United States Status: Offline Points: 11234 |
Post Options
Thanks(0)
|
Hi, Just comment all custom settings you set for .TabPaintManager - some of them breaked it.
|
|
Oleg, Support Team
CODEJOCK SOFTWARE SOLUTIONS |
|
McKloony
Senior Member Joined: 09 January 2007 Location: Germany Status: Offline Points: 340 |
Post Options
Thanks(0)
|
I did this. The problem is, that you have to generate a complite ribbon bar with theme blue (standard) and then set so theme White.
|
|
Product: Xtreme SuitePro (ActiveX) 16.2.5
Platform: XP / Windows 7 Language: Visual Basic 6.0 SP6 |
|
Oleg
Admin Group Joined: 21 May 2003 Location: United States Status: Offline Points: 11234 |
Post Options
Thanks(0)
|
Hi,
I don't see same after I commented your TabPaintManager custom code.
|
|
Oleg, Support Team
CODEJOCK SOFTWARE SOLUTIONS |
|
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 |