The following sample creates a separator:
|
Jabaco Source
|
1
2
3
4
5
6
7
8
9
10
11
12
13
|
Option Explicit
Public Sub Form_Load()
Dim tmpGroupFile As VBMenuGroup = Me.MenuBar.createMenuGroup(Null, "File", "File")
Call Me.MenuBar.createMenu(tmpGroupFile, "New", "New")
Call Me.MenuBar.createMenu(tmpGroupFile, "Open", "Open")
Call Me.MenuBar.addSeperator(tmpGroupFile)
Call Me.MenuBar.createMenu(tmpGroupFile, "Exit", "Exit")
End Sub
Public Sub Form_MenuClick(MenuItem As VB#IMenuItem)
MsgBox "Caption: " & MenuItem.Caption & " - ControlID: " & MenuItem.ControlID
End Sub
|
Note the spelling error separator/seperator.
To discover the universe behind Jabaco, it usually pays off to have a look at the
framework sources.
Another helpful feature is Jabaco's autocompletion in the source code editor.
To get to know what you can do with a MenuBar, you just enter "Call Me.MenuBar." in the above sample.
The IDE will then display a list of methods and properties. In most cases, this should help you on the right track.
Greetings!
A1880