ActiveRotationPointColor: IGxColor;
Свойство ActiveRotationPointColor определяет цвет точки вращения последнего (активного) выделенного объекта.
В рассматриваемом примере предполагается существование объекта ws типа IWxWorkspace.
Sub UserProc;
Var
ws: IWxWorkspace;
view : IWxView;
SStyle : IWxSelectionStyle;
Begin
view := ws.CreateView;
SStyle := view.SelectionStyle;
SStyle.RotationPointVisible := True;
SStyle.ActiveRotationPointColor := GxColor.FromName("Black");
End Sub UserProc;
После выполнения примера будет включено отображение точки вращения выделенного объекта и задан цвет для активной точки вращения.
См. также: