Object Model Reference : Classes : E : Effect : Properties : Effect.TextOnPath |
Property TextOnPath As EffectTextOnPath
Member of Effect
The TextOnPath property returns the EffectTextOnPath object for fitting text to a path.
The TextOnPath property returns a read-only value.
The following VBA example sets the distance between the text and its path to 1" for each object with text fit to a path on the active page.
Sub Test() |
Dim s As Shape |
Dim e As Effect |
For Each s In ActivePage.FindShapes(Type:=cdrTextShape) |
For Each e In s.Effects |
If e.Type = cdrTextOnPath Then e.TextOnPath.DistanceFromPath = 1 |
Next e |
Next s |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.