Application: IGxIcon;
Свойство Application возвращает объект, содержащий системную пиктограмму главной формы.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Begin
Self.Icon := GxSystemIcons.Application;
End Sub Button1OnClick;
После выполнения примера при нажатии на кнопку у формы будет установлена пиктограмма главной формы.
См. также: