Object Model Reference : Classes : E : EffectZipperDistortion : Properties : EffectZipperDistortion.Random
|
|
| Object Model Reference : Classes : E : EffectZipperDistortion : Properties : EffectZipperDistortion.Random |
Property Random As Boolean
Member of EffectZipperDistortion
The Random property returns or specifies whether the distorting waves in a Zipper distortion effect should be generated with random amplitudes.
The following VBA example selects all shapes having a Zipper distortion effect that is smooth, random, and not local.
Sub Test() |
Dim s As Shape, eff As Effect, zip As EffectZipperDistortion |
Dim sr As New ShapeRange |
For Each s In ActivePage.Shapes |
For Each eff In s.Effects |
If eff.Type = cdrDistortion Then |
If eff.Distortion.Type = cdrDistortionZipper Then |
Set zip = eff.Distortion.Zipper |
If zip.Smooth And zip.Random And Not zip.Local Then sr.Add s |
End If |
Exit For |
End If |
Next eff |
Next s |
sr.CreateSelection |
End Sub |
|
|
|
|
Copyright 2013 Corel Corporation. All rights reserved.