| 
       | 
        
       | 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.