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