AllowedInteractions: Integer;
AllowedInteractions: integer;
Свойство AllowedInteractions определяет действия, которые будут доступны для фигуры рабочего пространства.
В качестве значения данного свойства необходимо указать одно из значений (либо комбинацию значений) из элементов перечисления WxAllowedInteractions. При указании комбинации элементы разделяются ключевым словом OR.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента WorkspaceBox с наименованием «WorkspaceBox1» и какого-либо источника данных для него. На рабочем пространстве, отображаемом в компоненте, имеется минимум одна фигура.
Добавьте ссылки на системные сборки: Andy, Forms.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
View: IWxView;
Shape: IWxShape;
Begin
View := WorkspaceBox1.View;
View.ActiveTool := WxTool.Pointer;
Shape := View.Workspace.Shapes.Item(0);
Shape.AllowedInteractions := WxAllowedInteractions.AllowSelection Or WxAllowedInteractions.VerticalSizing;
End Sub Button1OnClick;
Imports Prognoz.Platform.Forms.Net;
Imports Prognoz.Platform.Interop.Andy;
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
View: IWxView;
Shape: IWxShape;
Begin
View := WorkspaceBoxNet1.View;
View.ActiveTool := WxTool.wtlPointer;
Shape := View.Workspace.Shapes.Item[0];
Shape.AllowedInteractions := Convert.ToInt32(WxAllowedInteractions.waiAllowSelection Or WxAllowedInteractions.waiVerticalSizing);
End Sub;
При нажатии на кнопку для рабочего пространства в качестве рабочего инструмента будет включен указатель. В этом режиме доступно выделение и активация фигур, изменение их размеров и т.д. Для первой фигуры будет установлено ограничение на доступные действия: фигуру можно будет выделить и изменить ее высоту.
См. также: