Object Model Reference : Classes : E : EffectTextOnPath : Properties : EffectTextOnPath.Path
|
|
| Object Model Reference : Classes : E : EffectTextOnPath : Properties : EffectTextOnPath.Path |
Property Path As Shape
Member of EffectTextOnPath
The Path property returns or specifies the path Shape object to which the text is attached.
The following VBA example applies a red outline to all paths with text attached.
Sub Test1() |
Dim s As Shape, eff As Effect |
For Each s In ActivePage.FindShapes(, cdrTextShape) |
For Each eff In s.Effects |
If eff.Type = cdrTextOnPath Then |
eff.TextOnPath.Path.Outline.Color.RGBAssign 255, 0, 0 |
End If |
Next eff |
Next s |
End Sub |
|
|
|
|
Copyright 2013 Corel Corporation. All rights reserved.