ActiveSelectAndMovePointColor: IGxColor;
Свойство ActiveSelectAndMovePointColor определяет цвет точек выделенных объектов при работе в режиме выделения и перемещения.
Данное свойство актуально, если в свойству IWxView.ActiveTool установлено значение WxTool.SelectAndMove.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием Button1, компонента WorkspaceBox с наименованием WorkspaceBox1 и какого-либо источника данных для WorkspaceBox1.
Добавьте ссылки на системные сборки: Andy, Drawing, Workspace.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Wsp: IWxWorkspace;
View: IWxView;
Rect: IWxEllipseBaloon;
Begin
Wsp := UiWorkspace1.WxWorkspace;
Wsp.BeginUpdate;
Rect := Wsp.CreateEllipseBaloon;
Wsp.EndUpdate;
View := WorkspaceBox1.View;
View.ActiveTool := WxTool.SelectAndMove;
View.SelectionStyle.ActiveSelectAndMovePointColor := GxColor.FromName("Red");
End Sub Button1OnClick;
После выполнения примера при нажатии на кнопку будет включен режим выделения и перемещения объектов рабочего пространства. При выделении объекты будут обозначены красными точками.
См. также: