Angle: Double;
The Angle property determines shape rotation angle (in degrees). When positive values are set, the shape is rotated clockwise, when negative values are set, the shape is rotated counter clockwise.
Executing the example requires an existing ws object of the IWxWorkspace type (Workspace). The workspace must contain two shapes.
Sub UserProc;
Var
ws: IWxWorkspace;
Shape: IWxShape;
Size: IGxSizeF;
Begin
ws.BeginUpdate;
Shape := ws.Shapes.Item(1);
Shape.Angle := 40;
Size := New GxSizeF.Create(43,78);
Shape.Size := Size;
ws.EndUpdate;
End Sub UserProc;
After executing the example size and rotation angle of the second shape are changed.
See also: