SetMenuTitleText()

Синтаксис

SetMenuTitleText(#Menu , Title , Text$)

Описание

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

Параметры

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

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

Ничего.

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

If OpenWindow(0, 200, 200, 300, 100, "Пример SetMenuTitleText")
    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
                    SetMenuTitleText(0, 0, "Файл") ; Изменение текста заголовка Меню "Проект" на "Файл"
            EndSelect
        EndIf
    Until Event = #PB_Event_CloseWindow
EndIf

См. также

GetMenuTitleText(), MenuTitle()

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

Все