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