Интерфейс MenuBar

Компонент MenuBar - панель меню - позволяет создать меню в виде компонента. Подробнее...

Граф наследования:MenuBar:

Inheritance graph
Граф связей класса MenuBar:

Collaboration graph
Полный список членов класса

Свойства

IDispatch *RW Menu []
 Свойство содержит в себе объект Action который описывает меню.

Подробное описание

Компонент MenuBar - панель меню - позволяет создать меню в виде компонента.

Заметки:
форма имеет свойство Menu для задания главного меню, но в этом случае меню не является компонентом, а реализуется автоматически операционной системой.
Создание: Компонент можно создать методом CreateMenuBar класса Frame

Заметки:
Компонент автоматически определяет свою высоту.
Пример (JScript):

o = new ActiveXObject("Scripting.WindowSystemObject")

o.EnableVisualStyles = true

f = o.CreateForm(0,0,0,0)

f.Text = "WSO"
f.ClientWidth = 300
f.ClientHeight = 100
f.CenterControl()

ReBar = f.CreateReBar(0,0,0,0)
ReBar.Align = o.Translate("AL_TOP")
ReBar.BandBorders = true
MenuBar = ReBar.CreateMenuBar(0,0,0,0)
FileMenu = MenuBar.Menu.Add("File")
ToolBar = ReBar.CreateToolBar(0,0,0,0)
ToolBar.Buttons.Add("Button1")
ToolBar.Buttons.Add("Button2")
ToolBar.Buttons.Add("Button3")
ToolBar.Buttons.Add("Button4")
ToolBar.Buttons.Add("Button5")
ToolBar.ShowText = true

with (FileMenu.Add("Open","CTRL+O"))
{
        OnExecute = OpenFile
}

FileMenu.Add("-")

with (FileMenu.Add("Exit","ESC"))
{
        OnExecute = CloseForm
}

HelpMenu = MenuBar.Menu.Add("Help")
with (HelpMenu.Add("Help","F1"))
{
        OnExecute = Help
}

f.Show()

o.Run()


function CloseForm(Sender)
{
        f.Close()
}

function OpenFile(Sender)
{
        //Some code...
}

function Help(Sender)
{
        //Some code...
}

Результат:

MenuBar1.jpg
MenuBar2.jpg


Полный список свойств

IDispatch* RW Menu

Свойство содержит в себе объект Action который описывает меню.

Заметки:
Можно назначать как существующий объект так и создавать новый (новый объект автоматически создается при попытке чтения свойства).


Документация по WSO 1.1. Последние изменения:Wed Aug 12 18:11:02 2015. (C) Веретенников А. Б. 2004-2015