modify commandbar size ???

 

hi~ ^^

[script removed]

 

before code

'********************************

    'Add toolbar in Assembly Environment

 

    For Each myEnvironment In objApp.Environments

        If myEnvironment.Name = objApp.ActiveEnvironment Then Exit For

    Next myEnvironment

 

 

    Set myCommandbar = myEnvironment.CommandBars

    Set myToolbar = myCommandbar.Add("Assembly_Manager", seBarFloating)

 

    'The next section adds VB macros

    Set myControl = myToolbar.Controls.Add()

    'Mycontrol.DescriptionText = "This command runs a custom macro"

    myControl.Enabled = True

    myControl.LoadFace (strAppPath & "vessel.bmp")

    myControl.OnAction = strAppPath & "Assembly_Manager.exe" 'Note that for your own custom macro, you'd supply a full path here

    myControl.ToolTipText = "Assembly Manager"

    myControl.Visible = True

***********************************

after code ???

 

Posted by: kim sunil
Post date: 11/29/2009 2:15:43 PM

1 REPLY

RE: modify commandbar size ???

Do you mean you want a "big" button in ST (the new command ribbon UI)? Toolbars are now converted to a group on the ribbon. If you have a large bitmap or want your image scaled up, you need to set the button style to seButtonIconAndCaptionBelow.

 

Tip: Starting with ST2 MP3, you can have your toolbar create its own tab by doing the following to the command bar name:

 

name = "My tab" & chr(10) & "My Group1".

 

You can add multiple groups by creating multiple command bars that share the first part of the name:

 

name2 = "My tab" & chr(10) & "My Group2".

 

Posted by: R.D. Holland
Post date: 1/26/2010 5:04:10 AM