Codejock Forums Homepage
Forum Home Forum Home > Codejock Products > ActiveX COM > Command Bars
  New Posts New Posts RSS Feed - Define one Toolbar - resulting in two (one empty)
  FAQ FAQ  Forum Search   Events   Register Register  Login Login

Define one Toolbar - resulting in two (one empty)

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


Joined: 13 March 2009
Status: Offline
Points: 52
Post Options Post Options   Thanks (0) Thanks(0)   Quote DaveB Quote  Post ReplyReply Direct Link To This Post Topic: Define one Toolbar - resulting in two (one empty)
    Posted: 23 May 2011 at 8:33pm
Place CommandBars control on form
Add the following code in FormLoad:
 
Dim ToolbarHusb As CommandBar
    Set ToolbarHusb = CommandBarHusb.Add("Husband", xtpBarTop)
    AddButton ToolbarHusb.Controls, xtpControlButton, ID_SPOUSES_HUSB
    ' add a few more buttons
 
    CommandBarHusb.Icons.LoadBitmap App.Path & "\res\Female32.png", ID_SPOUSES_HUSB, xtpImageNormal 'Pic:4013
    'load a few more icons
 
Run the program:
 
I am getting a blank bar above the one I am defining.  Why?
 
 
Also, how do I turn off the "Add or Remove..." option?
 
VB6 ActiveX
 
DaveB
Product: Xtreme SuitePro (ActiveX) version 15.0.2
Platform: Windows XP (32bit) - SP 3
Language: Visual Basic 6.0
Back to Top
jpbro View Drop Down
Senior Member
Senior Member
Avatar

Joined: 12 January 2007
Status: Offline
Points: 1355
Post Options Post Options   Thanks (0) Thanks(0)   Quote jpbro Quote  Post ReplyReply Direct Link To This Post Posted: 23 May 2011 at 8:53pm
1) Before building your toolbars, call CommandBarHusb.DeleteAll
2) ToolbarHusb.ShowExpandButton = False
Product: Xtreme SuitePro (ActiveX) version 16.2.6
Platform: Windows XP - SP3

Language: Visual Basic 6.0 SP6

Back to Top
 Post Reply Post Reply
  Share Topic   

Forum Jump Forum Permissions View Drop Down

Forum Software by Web Wiz Forums® version 12.04
Copyright ©2001-2021 Web Wiz Ltd.

This page was generated in 0.156 seconds.