GroupBehaviour: WxGroupBehaviour;
The GroupBehaviour property determines an object behavior during resizing of a group that contains this object.
By default, this property is set to ScaleWithGroup (if the group is resized, the object scales up or down).
Executing the example requires an existing WorkspaceBox1 object of the WorkspaceBox type.
Sub User;
Var
WorkspaceBox1 : WorkspaceBox;
Ws : IWxWorkspace;
i : Integer;
shape : IWxShape;
Begin
Ws := WorkspaceBox1.View.Workspace;
shape := Ws.Shapes.Item(0);
shape.GroupBehaviour := WxGroupBehaviour.RepositionOnly;
For i := 0 To Ws.Shapes.Count - 1 Do
WorkspaceBox1.View.SelectedShapes.Add(Ws.Shapes.Item(i));
End For;
WorkspaceBox1.View.GroupSelectedShapes;
End Sub User;
After executing the example all objects in a workspace are grouped, and if the group is resized, only the size of the first object remains the same.
See also: