Width: Integer;
Свойство Width возвращает ширину пиктограммы в пикселях.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Icon: IGxIcon;
w: Integer;
Begin
Icon := Self.Icon;
w := Icon.Width;
End Sub Button1OnClick;
После выполнения примера при нажатии на кнопку в переменной «w» будет содержаться ширина пиктограммы формы.
См. также: