Add(Value: IComponent);
Value. Компонент, который необходимо добавить на панель инструментов.
Метод Add осуществляет добавление компонента на панель инструментов.
На панели инструментов могут располагаться компоненты ToolbarButton и ToolbarComboBox.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием Button1 и компонента Toolbar с наименованием Toolbar1.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
BarButton: IToolbarButton;
Begin
BarButton := New ToolbarButton.Create;
BarButton.Text := "Новая кнопка";
Toolbar1.Controls.Add(BarButton);
End Sub Button1OnClick;
После выполнения примера при нажатии на кнопку на панели инструментов будет создана новая кнопка.
См. также: