IGxIcon.Clone

Синтаксис

Clone: IGxIcon;

Описание

Метод Clone создает копию пиктограммы.

Пример

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

Var

Icon, Icon1: IGxIcon;

Begin

Icon := Self.Icon;

Icon1 := Icon.Clone;

End Sub Button1OnClick;

После выполнения примера при нажатии на кнопку в переменной «Icon1» будет содержаться копия пиктограммы формы.

См. также:

IGxIcon