IRibbon.CustomDefaultMenuItem

Синтаксис

Описание

Свойство CustomDefaultMenuItem возвращает наименование новой команды контекстного меню ленты инструментов.

Комментарии

Если значение свойства не задано, то новая команда контекстного меню не будет отображаться.

Пример Fore

Для выполнения примера в репозитории предполагается наличие формы, содержащей два компонента Button с наименованиями Button1 и Button2, компонент Ribbon с наименованием Ribbon1. Компонент Ribbon наполнен двумя компонентами RibbonCategory с наименованиями RibbonCategory1 и RibbonCategory2, каждый из которых содержит компонент RibbonPanel с наименованиями RibbonPanel1 и RibbonPanel2. На компоненте с наименованием RibbonPanel1 размещается компонент RibbonButton с наименованием RibbonButton1.

Свойству CustomDefaultMenuItem компонента Ribbon задано значение «Настройка ленты инструментов».

Добавьте ссылки на системные сборки: Ui.

Пример является обработчиком событий OnClick для компонентов с наименованиями Button1 и Button2 и события OnCustomDefaultMenuItem для компонента с наименованием Ribbon1.

// Добавляем кнопку на другую вкладку
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Begin
    RibbonPanel2.AddReferenceElement(RibbonButton1);
End Sub Button1OnClick;
// Изменяем наименование кнопок
Sub Button2OnClick(Sender: Object; Args: IMouseEventArgs);
Begin
    RibbonButton1.Text := "Новый текст";
End Sub Button2OnClick;
// Выводим сообщение при выборе новой команды контекстного меню
Sub Ribbon1OnClickCustomDefaultMenuItem(Sender: Object; Args: IEventArgs);
Begin
    WinApplication.InformationBox("OnClickCustomDefaultMenuItem");
End Sub Ribbon1OnClickCustomDefaultMenuItem;

В результате выполнения примера:

1. При вызове контекстного меню ленты инструментов будет отображаться команда, указанная как значение в свойстве CustomDefaultMenuItem. При выполнении команды будет выведено сообщение.

2. При нажатии на кнопку Button1 на компонент с наименованием RibbonPanel2 будет добавлена кнопка, которая является ссылкой на кнопку, находящуюся на компоненте с наименованием RibbonPanel1. Добавленная кнопка будет зависеть от состояния кнопки, на которую она ссылается.

3. При нажатии на кнопку Button2 наименование обоих кнопок будет заменено на значение, указанное в обработчике события - «Новый текст».

См. также:

IRibbon