ПанельМеню.ИндексОткрываемого (MenuBar.OpenIndex) Свойство

Использование

Чтение и запись.

Значение

Тип: Число.

Индекс пункта подменю панели меню, который будет активирован при нажатии клавиши F9 или при нажатии клавиши вызова пункта подменю.

Примечание

Пример

ПанельМеню1.ИндексОткрываемого = 1;
ИндексОткрываемого = ПанельМеню1.ИндексОткрываемого;
Полный пример кода 



Перем ТФ, Текст, Выход, ПанельМеню1, КлавишаВызова;

Процедура ПриОткрытии() Экспорт
	ПанельМеню1.Открыть();
	ИндексОткрываемого = ПанельМеню1.ИндексОткрываемого;
	ТФ.Верхний.Текст = Текст + ТекущаяУниверсальнаяДатаВМиллисекундах() + "
	|ИндексОткрываемого = " + ИндексОткрываемого;
КонецПроцедуры

Процедура Меню_Нажатие() Экспорт
	Объект = ТФ.АргументыСобытия.Параметр;
	КлавишаВызова = Объект.КлавишаВызова;
	ТФ.Верхний.Текст = Текст + Объект.Заголовок + " " + ТекущаяУниверсальнаяДатаВМиллисекундах() + "
	|" + Объект.Заголовок + ".КлавишаВызова = " + КлавишаВызова;
КонецПроцедуры

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll");
ТФ = Новый ТерминалФормыДляОдноСкрипта();

ПанельМеню1 = ТФ.ПанельМеню();
ТФ.Верхний.Добавить(ПанельМеню1);

Файл = ТФ.ПунктМеню();
Файл.Заголовок = "_Файл";
Файл.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Файл);
ПанельМеню1.ПодМеню.Добавить(Файл);

Открыть = ТФ.ЭлементМеню();
Открыть.Заголовок = "_Открыть";
Открыть.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Открыть);
Файл.Элементы.Добавить(Открыть);

Выход = ТФ.ЭлементМеню();
Выход.Заголовок = "В_ыход";
Выход.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Выход);
Файл.Элементы.Добавить(Выход);
//================================================
Правка = ТФ.ПунктМеню();
Правка.Заголовок = "П_равка";
Правка.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Правка);
ПанельМеню1.ПодМеню.Добавить(Правка);

Отмена = ТФ.ЭлементМеню();
Отмена.Заголовок = "Отмена";
Отмена.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Отмена);
Правка.Элементы.Добавить(Отмена);

Повтор = ТФ.ЭлементМеню();
Повтор.Заголовок = "Повтор";
Повтор.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Повтор);
Правка.Элементы.Добавить(Повтор);
//================================================
Поиск = ТФ.ПунктМеню();
Поиск.Заголовок = "По_иск";
Поиск.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Поиск);
ПанельМеню1.ПодМеню.Добавить(Поиск);

ИскатьДалее = ТФ.ЭлементМеню();
ИскатьДалее.Заголовок = "ИскатьДалее";
ИскатьДалее.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", ИскатьДалее);
Поиск.Элементы.Добавить(ИскатьДалее);

ИскатьРанее = ТФ.ЭлементМеню();
ИскатьРанее.Заголовок = "ИскатьРанее";
ИскатьРанее.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", ИскатьРанее);
Поиск.Элементы.Добавить(ИскатьРанее);
//================================================
Текст = "
|
|
|
|
|
|
|Откройте панель меню по Alt или F9 и используйте клавиши вызова пунктов меню.
|";
ТФ.Верхний.Текст = Текст;

ПанельМеню1.ИндексОткрываемого = 1;

ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии");

ТФ.Запуск();

Тестовый код 



Перем ТФ, Текст, ПанельМеню1, КлавишаВызова, Таймер1, ИндексОткрываемого;

Процедура ПриОткрытии() Экспорт
	ПанельМеню1.Открыть();
	ИндексОткрываемого = ПанельМеню1.ИндексОткрываемого;
КонецПроцедуры

Процедура Меню_Нажатие() Экспорт
	Объект = ТФ.АргументыСобытия.Параметр;
	КлавишаВызова = Объект.КлавишаВызова;
	ТФ.Верхний.Текст = Текст + Объект.Заголовок + " " + ТекущаяУниверсальнаяДатаВМиллисекундах() + "
	|" + Объект.Заголовок + ".КлавишаВызова = " + КлавишаВызова;
КонецПроцедуры

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll");
ТФ = Новый ТерминалФормыДляОдноСкрипта();

ПанельМеню1 = ТФ.ПанельМеню();
ТФ.Верхний.Добавить(ПанельМеню1);

Файл = ТФ.ПунктМеню();
Файл.Заголовок = "_Файл";
Файл.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Файл);
ПанельМеню1.ПодМеню.Добавить(Файл);

Открыть = ТФ.ЭлементМеню();
Открыть.Заголовок = "_Открыть";
Открыть.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Открыть);
Файл.Элементы.Добавить(Открыть);

Выход = ТФ.ЭлементМеню();
Выход.Заголовок = "В_ыход";
Выход.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Выход);
Файл.Элементы.Добавить(Выход);
//================================================
Правка = ТФ.ПунктМеню();
Правка.Заголовок = "П_равка";
Правка.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Правка);
ПанельМеню1.ПодМеню.Добавить(Правка);

Отмена = ТФ.ЭлементМеню();
Отмена.Заголовок = "Отмена";
Отмена.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Отмена);
Правка.Элементы.Добавить(Отмена);

Повтор = ТФ.ЭлементМеню();
Повтор.Заголовок = "Повтор";
Повтор.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Повтор);
Правка.Элементы.Добавить(Повтор);
//================================================
Поиск = ТФ.ПунктМеню();
Поиск.Заголовок = "По_иск";
Поиск.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Поиск);
ПанельМеню1.ПодМеню.Добавить(Поиск);

ИскатьДалее = ТФ.ЭлементМеню();
ИскатьДалее.Заголовок = "ИскатьДалее";
ИскатьДалее.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", ИскатьДалее);
Поиск.Элементы.Добавить(ИскатьДалее);

ИскатьРанее = ТФ.ЭлементМеню();
ИскатьРанее.Заголовок = "ИскатьРанее";
ИскатьРанее.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", ИскатьРанее);
Поиск.Элементы.Добавить(ИскатьРанее);
//================================================
Текст = "
|
|
|
|
|
|
|Откройте панель меню по Alt или F9 и используйте клавиши вызова пунктов меню.
|";
ТФ.Верхний.Текст = Текст;

ПанельМеню1.ИндексОткрываемого = 1;

ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии");

ТФ.ЗапуститьИЗавершить();

Сообщить(?(
ИндексОткрываемого = 1
, "", "!!! ") + "ПанельМеню.ИндексОткрываемого (MenuBar.OpenIndex) Свойство" + " " + ТекущаяДата() + Символы.ПС);

Смотрите также

Библиотека OneScriptTerminalGui