Shape.CreateTwisterDistortion

Function CreateTwisterDistortion(OriginX As Double, OriginY As Double, Angle As Double) As Effect

Member of Shape

The CreateTwisterDistortion method applies a Twister distortion to a shape. This method returns an Effect object that represents the distortion-effect properties.


Parameters	Description
OriginX	Specifies the x-around which the Twister distortion rotates
OriginY	Specifies the y-coordinate around which the Twister distortion rotates
Angle	Specifies the degree of the Twister-rotation effect in the shape object

The following code example creates an ellipse and applies a Twister distortion to the ellipse. It then converts the ellipse to a curve.

Sub Test() 
 Dim s As Shape 
 ActiveDocument.ResetSettings 
 Set s = ActiveLayer.CreateEllipse2(ActivePage.SizeWidth / 2, _ 
  ActivePage.SizeHeight / 2, 2) 
 s.CreateTwisterDistortion 0, 3, 80 
 s.ConvertToCurves 
End Sub