TextRange.HorizShift

Property HorizShift As Long

Member of TextRange

The HorizShift properety returns or sets the amount by which the text is shifted horizontally.

The following code example shifts the paragraph text horizontally:

Sub Test() 
 Dim d As Document 
 Dim s As Shape 
 Dim t As Text 
 Set d = CreateDocument 
 Set s = d.ActiveLayer.CreateParagraphText(3, 3, 5, 5, "This is an 
example.") 
 Set t = s.Text 
 t.Story.HorizShift = 3 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.