IWxView.GroupSelectedShapes

Syntax

GroupSelectedShapes;

Description

The GroupSelectedShapes method creates a group using the selected objects.

Example

Executing the example requires an existing ws object of the IWxWorkspace type.

Sub UserProc;

Var

ws: IWxWorkspace;

view : IWxView;

Shs : IWxShapes;

i : Integer;

Begin

view := ws.CreateView;

Shs := ws.Shapes;

For i := 0 To Shs.Count - 1 Do

view.SelectedShapes.Add(ws.Shapes.Item(i));

End For;

view.GroupSelectedShapes;

End Sub UserProc;

After executing the example a group is created using all workspace objects.

See also:

IWxView