IToolbarControls.Insert

Синтаксис

Insert(Index: Integer; Value: IComponent);

Параметры

Index - индекс позиции, в которую необходимо вставить компонент.

Value - компонент, который необходимо вставить на панель инструментов.

Описание

Метод Insert осуществляет вставку компонента Value в позицию Index на панели инструментов.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием "Button1" и компонента Toolbar с наименованием "Toolbar1".

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);

Var

Controls: IToolbarControls;

Begin

Controls := Toolbar1.Controls;

Controls.Insert(Controls.Count, Controls.Item(0));

End Sub Button1OnClick;

После выполнения примера при нажатии на кнопку элемент управления, расположенный на первой позиции панели инструментов, будет перемещен на последнюю позицию.

См. также:

IToolbarControls