Object Model Reference : Classes : E : EffectTextOnPath : Properties : EffectTextOnPath.VertPlacement |
Property VertPlacement As cdrFittedVertPlacement
Member of EffectTextOnPath
The VertPlacement property returns or specifies the mode of the vertical placement of text for a text-on-path effect.
The VertPlacement property returns cdrFittedVertPlacement.
The following VBA example places the text on a circle, so it appears centered vertically relative to the circle.
Sub Test() |
Dim sText As Shape, sPath As Shape |
Set sText = ActiveLayer.CreateArtisticText(0, 0, "Some Text") |
Set sPath = ActiveLayer.CreateEllipse2(4.25, 5.5, 2) |
sText.Text.FitToPath sPath |
sText.Effects(1).TextOnPath.VertPlacement = cdrCenterVertPlacement |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.