IWxShape.Angle

Syntax

Angle: Double;

Description

The Angle property determines shape rotation angle (in degrees).

Comments

When positive values are set, the shape is rotated clockwise, when negative values are set, the shape is rotated counter clockwise.

Example

Executing the example requires that the repository contains a workspace with the WSP identifier that contains several shapes.

Add links to the Andy, Drawing, Metabase system assemblies.

Sub UserProc;
Var
    MB: IMetabase;
    Wsp: IWxWorkspace;
    Size: IGxSizeF;
    Shape: IWxShape;
Begin
    MB := MetabaseClass.Active;
    // Get workspace
    Wsp := MB.ItemById("WSP").Edit As IWxWorkspace;
    Wsp.BeginUpdate;
    Shape := Wsp.Shapes.Item(1);
    Shape.Angle := 40;
    Size := New GxSizeF.Create(43, 78);
    Shape.Size := Size;
    Wsp.EndUpdate;
    // Save changes
    (Wsp As IMetabaseObject).Save;
End Sub UserProc;

After executing the example size and rotation angle of the second shape are changed.