Print Page | Close Window

ShortCutBar and LunaColors=False

Printed From: Codejock Forums
Category: Codejock Products
Forum Name: Suite Pro
Forum Description: Topics Related to Codejock Suite Pro
URL: http://forum.codejock.com/forum_posts.asp?TID=1800
Printed Date: 17 November 2024 at 4:29pm
Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com


Topic: ShortCutBar and LunaColors=False
Posted By: aterron
Subject: ShortCutBar and LunaColors=False
Date Posted: 17 February 2005 at 4:46am

I can't figure out how to mimic the shortcutbar shown in the attached image. As you can see the colors of the ShortCutbar are identical of those of the CommandBar when Lunacolors = False

TIA

 




Replies:
Posted By: gshawn
Date Posted: 17 February 2005 at 5:02am

This may not be the best workaround, but as of v9.60 you can specify the colors in code:

    ShortcutCaption1.GradientColorLight = &HD2E1E3
    ShortcutCaption1.GradientColorDark = &HA6AFB2

I hope this helps!



Posted By: aterron
Date Posted: 17 February 2005 at 5:41am
Well, thanks...but I'm talking about the ShortCutBar not the ShortCutBarCaption...


Posted By: SuperMario
Date Posted: 18 February 2005 at 7:59am
This will disable luna colors in all suite controls (TaskPanel, ShortcutBar, etc).

Private Sub Form_Initialize()
    SuiteControlsGlobalSettings.ColorManager.SystemTheme = xtpSystemThemeUnknown
End Sub

Then you would use gshawn's code to update the ShortcutCaption Controls:
   
    ShortcutCaption1.GradientColorLight = &HD2E1E3
    ShortcutCaption1.GradientColorDark = &HA6AFB2


Posted By: aterron
Date Posted: 21 February 2005 at 2:50am
Thanks SuperMario


Posted By: gshawn
Date Posted: 21 February 2005 at 4:35am
Originally posted by aterron aterron wrote:

Well, thanks...but I'm talking about the ShortCutBar not the ShortCutBarCaption...
Oops, sorry about that... That's what I get for replying to a post at 5 in the morning!


Posted By: williamyang
Date Posted: 12 July 2005 at 11:01pm
I got same problem, how to disable Lunacolors in Shortcut bar.


Posted By: SuperMario
Date Posted: 13 July 2005 at 9:26am
This will disable luna colors in all suite controls (TaskPanel, ShortcutBar, etc).

Private Sub Form_Initialize()
    SuiteControlsGlobalSettings.ColorManager.SystemTheme = xtpSystemThemeUnknown
End Sub

Then you would use gshawn's code to update the ShortcutCaption Controls:
   
    ShortcutCaption1.GradientColorLight = &HD2E1E3
    ShortcutCaption1.GradientColorDark = &HA6AFB2


Posted By: williamyang
Date Posted: 13 July 2005 at 10:30am

I mean shortcutbar, not shorcutcaption, they are different control, shortcutbar has not GrandientColor property.

Originally posted by SuperMario SuperMario wrote:

This will disable luna colors in all suite controls (TaskPanel, ShortcutBar, etc).

Private Sub Form_Initialize()
    SuiteControlsGlobalSettings.ColorManager.SystemTheme = xtpSystemThemeUnknown
End Sub

Then you would use gshawn's code to update the ShortcutCaption Controls:
   
    ShortcutCaption1.GradientColorLight = &HD2E1E3
    ShortcutCaption1.GradientColorDark = &HA6AFB2



Posted By: ianp
Date Posted: 14 July 2005 at 1:52am

Have you tried using ColorManager.SetColor? It will affect the colors used by all SuiteControls, but allows you to modify the colors.

Private Sub Form_Initialize()
  With SuiteControlsGlobalSettings.ColorManager
    .SystemTheme = xtpSystemThemeUnknown
    .SetColor STDCOLOR_BTNFACE, &HA6AFB2
    .SetColor STDCOLOR_WINDOW, &HD2E1E3
  End With
End Sub




Print Page | Close Window

Forum Software by Web Wiz Forums® version 12.04 - http://www.webwizforums.com
Copyright ©2001-2021 Web Wiz Ltd. - https://www.webwiz.net