SetMenuItemText()

Синтаксис

SetMenuItemText(#Menu , Item , Text$)

Описание

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

Параметры

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

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

Ничего.

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

If OpenWindow(0, 200, 200, 300, 100, "Пример  SetMenuItemText")
    ButtonGadget(0, 70, 10, 200, 30, "Изменить текст пункта Открыть")
    If CreateMenu(0, WindowID(0))
        MenuTitle("Проект")
        MenuItem(1, "Открыть")
    EndIf

    Repeat
        Event = WaitWindowEvent()
        If Event = #PB_Event_Gadget
            Select EventGadget()
                Case 0
                    SetMenuItemText(0, 1, "Новый") ; Изменение текста пункта Меню "Открыть" на "Новый"
            EndSelect
        EndIf
    Until Event = #PB_Event_CloseWindow
EndIf

См. также

GetMenuItemText(), MenuItem()

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

Все