Object Model Reference : Classes : E : EffectContour : Properties : EffectContour.Direction
|
|
| Object Model Reference : Classes : E : EffectContour : Properties : EffectContour.Direction |
Property Direction As cdrContourDirection
Member of EffectContour
The Direction property returns or specifies the direction of a contour effect.
The Direction property returns a value of cdrContourDirection.
The following VBA example checks all contours on the current page and changes them as follows: all outside contours are to have twice as many steps, and all inside contours are to have a step distance of half of the previous size. The contours to the center of the shape are left unchanged.
Sub Test() |
Dim s As Shape, eff As Effect |
For Each s In ActivePage.Shapes |
For Each eff In s.Effects |
If eff.Type = cdrContour Then |
Select Case eff.Contour.Direction |
Case cdrContourOutside |
eff.Contour.Steps = eff.Contour.Steps * 2 |
Case cdrContourInside |
eff.Contour.Offset = eff.Contour.Offset / 2 |
Case cdrContourToCenter |
' Do nothing |
End Select |
End If |
Next eff |
Next s |
End Sub |
|
|
|
|
Copyright 2013 Corel Corporation. All rights reserved.