Layer.CreateParagraphTextWide

Function CreateParagraphTextWide(Left As Double, Top As Double, Right As Double, Bottom As Double, [Text As String], [LanguageID As cdrTextLanguage = cdrLanguageNone], [CharSet As cdrTextCharSet = cdrCharSetMixed], [Font As String], [Size As Single], [Bold As cdrTriState = cdrUndefined], [Italic As cdrTriState = cdrUndefined], [Underline As cdrFontLine = cdrMixedFontLine], [Alignment As cdrAlignment = cdrMixedAlignment]) As Shape

Member of Layer

The CreateParagraphTextWide method creates paragraph text in Unicode.


Parameters	Description
Left	Specifies the distance from the left side of the paragraph-text frame to the left side of the page frame
Top	Specifies the distance from the top side of the paragraph-text frame to the top of the page frame
Right	Specifies the distance from the right side of the paragraph-text frame to the right side of the page frame
Bottom	Specifies the distance from the bottom of the paragraph-text frame to the bottom of the page frame
Text	Specifies the text This parameter is optional.
LanguageID	Specifies the language This parameter is optional, and its default value is cdrLanguageNone (0).
CharSet	Specifies the character set This parameter is optional, and its default value is cdrCharSetMixed (-1).
Font	Specifies the font This parameter is optional.
Size	Specifies the font size This parameter is optional, and its default value is 0.
Bold	Specifies whether to apply bold This parameter is optional, and its default value is cdrUndefined (-2).
Italic	Specifies whether to apply italic This parameter is optional, and its default value is cdrUndefined (-2).
Underline	Specifies an underline This parameter is optional, and its default value is cdrMixedFontLine (7).
Alignment	Specifies an alignment This parameter is optional, and its default value is cdrMixedAlignment (6).

The following code example creates a paragraph-text object in Greek:

Sub Test() 
 Dim s As Shape 
 Set s = ActiveLayer.CreateParagraphTextWide(0, 3, 3, 0, Chr(216) & _ 
  Chr(231) & Chr(241) & Chr(233) & Chr(243), cdrGreek, 
cdrCharSetGreek, _ 
  "Times New Roman", 24) 
End Sub