Codejock Forums Homepage
Forum Home Forum Home > Codejock Products > Visual C++ MFC > Command Bars
  New Posts New Posts RSS Feed - Problem updating RibbonBar to rel. 18
  FAQ FAQ  Forum Search   Events   Register Register  Login Login

Problem updating RibbonBar to rel. 18

 Post Reply Post Reply
Author
Message
Superpippo View Drop Down
Groupie
Groupie


Joined: 02 March 2005
Status: Offline
Points: 65
Post Options Post Options   Thanks (0) Thanks(0)   Quote Superpippo Quote  Post ReplyReply Direct Link To This Post Topic: Problem updating RibbonBar to rel. 18
    Posted: 14 November 2018 at 1:10pm
I have updated a simple vb6 project to codejock rel 18.
The code have a simple ribbon bar and with codejock rel 15 it works with a nice blue ribbonbar, updating to commandbar control to rel 18 the ribbon is black.

What's wrong ?

the code to create the ribbonbar is the following, simply create a vb6 form put a commandbar control inside it and copy the following code in the form load event:

    Dim MyRibbonBar As RibbonBar
    Dim RibTab As RibbonTab
    Dim RibGroup As RibbonGroup
    Dim Control As CommandBarControl
    
    'create a ribbonbar
    Set MyRibbonBar = CommandBars.AddRibbonBar("The Ribbon")
    MyRibbonBar.EnableDocking xtpFlagStretched
    
    'create a tab
    Set RibTab = MyRibbonBar.InsertTab(0, "&TestTab")

    'create a group
    Set RibGroup = RibTab.Groups.AddGroup("FirstGroup", 1)
    RibGroup.Caption = "FirstGroup"

    'create a control
    Set Control = RibGroup.Add(xtpControlButton, 100, "FirstButton", -1, False)
'    Control.BeginGroup = BeginGroup
    Control.DescriptionText = "FirstButton"
    Control.Style = 0 'ButtonStyle
    Control.Category = "controls" 'Category

    'refresh ribbonbar
    MyRibbonBar.RecalcLayout

Thanks a lot



SuperPippo
Back to Top
gibra View Drop Down
Senior Member
Senior Member
Avatar

Joined: 31 October 2008
Location: Italy
Status: Offline
Points: 277
Post Options Post Options   Thanks (0) Thanks(0)   Quote gibra Quote  Post ReplyReply Direct Link To This Post Posted: 15 November 2018 at 4:10am
I confirm this problem (using 16.4 and 18.2 versions)
With 15.3 works fine.
gibra
CJ SuiteControl v: 13.x to 17.x
Windows 10 64bit
VS2017 - VB6.0 SP6
VS/VB 6.0 Installer v4.8 for Windows
Back to Top
 Post Reply Post Reply
  Share Topic   

Forum Jump Forum Permissions View Drop Down



This page was generated in 0.047 seconds.