UnbindMenuEvent()

Синтаксис

UnbindMenuEvent(#Menu , MenuItem , @Callback())

Описание

Удаляет связь события Меню с процедурой обратного вызова, добавленную ранее с помощью функции BindMenuEvent(). Если соответствующее событие не найдено, эта команда не будет иметь никакого эффекта.

Параметры

#Menu	Номер, идентифицирующий используемое Меню.
MenuItem	Пункт используемого Меню, у которого требуется удалить связь события с процедурой обратного вызова.
@Callback()	Адрес процедуры обратного вызова, которая связана с событием, и эту связь требуется удалить.

Возвращаемое значение

Ничего.

Пример

Procedure TestHandler()
    Debug "Событие Меню 'Тест'"
EndProcedure

Procedure QuitHandler()
    Debug "Событие Меню 'выход'"
    End
EndProcedure

OpenWindow(0, 100, 100, 200, 50, "Нажмите для теста", #PB_Window_SystemMenu)

CreateMenu(0, WindowID(0))
MenuTitle("Файл")
MenuItem(0, "Тест")
MenuItem(1, "Выход")

BindMenuEvent(0, 0, @TestHandler())
BindMenuEvent(0, 1, @QuitHandler())

UnbindMenuEvent(0, 1, @QuitHandler()) ; Отключить событие 'выход'

Repeat
    Event = WaitWindowEvent()
Until Event = #PB_Event_CloseWindow

См. также

BindEvent(), BindGadgetEvent(), BindMenuEvent(), WindowEvent(), WaitWindowEvent()

Поддерживаемые OS

Все