Previous Document Next Document

Object Model Reference : Classes : E : EffectZipperDistortion : Properties : EffectZipperDistortion.Smooth


EffectZipperDistortion.Smooth

Property Smooth As Boolean

Description

Member of EffectZipperDistortion

The Smooth property returns or specifies whether the wave peaks are smooth in a Zipper distortion effect.

VBA example

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

Previous Document Next Document Back to Top

Copyright 2013 Corel Corporation. All rights reserved.