GetMenuItemText()

Синтаксис

Text$ = GetMenuItemText(#Menu , Item)

Описание

Возвращает текст из указанного пункта Меню.

Параметры

#Menu	Номер, идентифицирующий используемое Меню.
Item	Номер, идентифицирующий пункт Меню в рамках указанного Меню, текст которого требуется получить.

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

Возвращает текст отображаемый в пункте Меню.

Пример (Фран)

If OpenWindow(0, 200, 200, 300, 100, "Пример GetMenuItemText")
    If CreateMenu(0, WindowID(0))
        MenuTitle("Проект")
        MenuItem(1, "Новый")
        MenuItem(2, "Открыть")
    EndIf

    Repeat
        Event = WaitWindowEvent()
        If Event = #PB_Event_Menu          ; Было нажато Меню
            Select EventMenu()
                Case 1
                    ShowDebugOutput()
                    Debug " Был нажат 1-й пункт Меню с текстом: " + GetMenuItemText(0, 1)
                Case 2
                    ShowDebugOutput()
                    Debug " Был нажат 2-й пункт Меню с текстом: " + GetMenuItemText(0, 2)
            EndSelect
        EndIf
    Until Event = #PB_Event_CloseWindow
EndIf

См. также

SetMenuItemText(), MenuItem()

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

Все