Views: IWxViews;
The Views property returns a workspace views collection.
Executing the example requires an existing ws object of the IWxWorkspace type.
Sub UserProc;
Var
ws: IWxWorkspace;
view : IWxView;
Shapes : IWxShapes;
SelectS : IWxSelectedShapes;
Begin
view := ws.Views.Item(0);
SelectS := view.SelectedShapes;
Shapes := ws.Shapes;
SelectS.Add(Shapes.Item(0));
SelectS.Add(shapes.Item(1));
SelectS.Align(WxShapesAlignment.VerticalCenter);
End Sub UserProc;
After executing the example the selected shapes are aligned to the vertical center.
See also: