Object Model Reference : Classes : S : StructFontProperties : Properties : StructFontProperties.Overscore |
Property Overscore As cdrFontLine
Member of StructFontProperties
The Overscore property returns or specifies the type of line to appear above the characters in a text object.
The Overscore property returns a value of cdrFontLine.
The following VBA example creates a text object and applies double lines above and below it.
Sub Test() |
Dim s As Shape |
Set s = ActiveLayer.CreateArtisticText(4, 5, "A Text String") |
With s.Text.FontProperties |
.Underline = cdrDoubleThinFontLine |
.Overscore = cdrDoubleThinFontLine |
End With |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.