CreateArgs(Control: IControl);
Control - компонент, над которым будет сгенерировано событие вызова контекстного меню.
Конструктор CreateArgs создает аргумент события, возникающего при вызове контекстного меню над каким либо компонентом формы.
Для выполнения примера предполагается наличие формы, кнопки с наименованием "Button1", компонента PopupMenu с наименованием "PopupMenu1" и компонента ScrollBox с наименованием "ScrollBox1".
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Popup: IPopupMenuEventArgs;
Begin
Popup := New PopupMenuEventArgs.CreateArgs(ScrollBox1);
PopupMenu1.OnPopup(PopupMenu1, Popup);
End Sub Button1OnClick;
После выполнения примера, при нажатии на кнопку, будет сгенерировано событие вызова контекстного меню над компонентом "ScrollBox1".
См. также: