MenuAllClosed Event

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

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

Значение

Возвращает или задает код для события, когда все меню закрыты.

Примечание

Аргументы события

Отправитель (Sender)	Возвращает источник (объект) последнего события.
Параметр (Parameter)	Возвращает объект, заданный при установке обработчика события, для передачи в обработчик события.

Пример

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

Полный пример кода



Перем ТФ, ПанельМеню1, ВсеЗакрыты, Таймер1, Таймер2;

Процедура ПриОткрытии() Экспорт
КонецПроцедуры

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

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

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

ТФ.Верхний.Текст = "
|
|Откройте и затем закройте меню (F9)";

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

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

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

ЭлементМеню2 = ТФ.ЭлементМеню();
ЭлементМеню2.Заголовок = "_Выход";
ЭлементМеню2.Подсказка = "Выход";
ПунктМеню1.Элементы.Добавить(ЭлементМеню2);

ПунктМеню2 = ТФ.ПунктМеню();
ПунктМеню2.Заголовок = "Справка";
ПунктМеню2.Подсказка = "Справка";
ПанельМеню1.ПодМеню.Добавить(ПунктМеню2);

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

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

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

Тестовый код



Перем ТФ, ПанельМеню1, ВсеЗакрыты, Таймер1, Таймер2;

Процедура ПриОткрытии() Экспорт
КонецПроцедуры

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

	ТФ.ТаймерНачатьИОстановить(ЭтотОбъект, "ТаймерТик1");
КонецПроцедуры

Процедура ТаймерТик1() Экспорт
	ТФ.Завершить();
КонецПроцедуры

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

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

ТФ.Верхний.Текст = "
|
|Откройте и затем закройте меню (F9)";

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

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

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

ЭлементМеню2 = ТФ.ЭлементМеню();
ЭлементМеню2.Заголовок = "_Выход";
ЭлементМеню2.Подсказка = "Выход";
ПунктМеню1.Элементы.Добавить(ЭлементМеню2);

ПунктМеню2 = ТФ.ПунктМеню();
ПунктМеню2.Заголовок = "Справка";
ПунктМеню2.Подсказка = "Справка";
ПанельМеню1.ПодМеню.Добавить(ПунктМеню2);

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

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

Сообщить(?(
ВсеЗакрыты
, "", "!!! ") + "ПанельМеню.ВсеЗакрыты (MenuBar.MenuAllClosed) Событие" + " " + ТекущаяДата() + Символы.ПС);

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

Библиотека OneScriptTerminalGui