TextRange.Alignment

Property Alignment As cdrAlignment

Member of TextRange

The Alignment property returns or sets the alignment of the text in the range.

The following code example aligns the text in the paragraph to the center of each line:

Sub Test() 
 Dim t As Text 
 Dim s As Shape 
 Dim d As Document 
 Set d = CreateDocument 
 Set s = d.ActiveLayer.CreateParagraphText(2, 2, 8, 8, "This is an 
example.") 
 Set t = s.Text 
 t.Story.Alignment = cdrCenterAlignment 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.