Object Model Reference : Classes : T : TextRange : Properties : TextRange.LanguageID |
Property LanguageID As cdrTextLanguage
Member of TextRange
The LanguageID property returns or specifies the language code for a text range.
The following VBA example changes the character set and the language code to Greek, and it adds characters that are to be typed in Greek.
Sub Test() |
Dim d As Document |
Dim s As Shape |
Dim t As Text |
Dim tr As TextRange |
Set d = CreateDocument |
Set s = d.ActiveLayer.CreateParagraphText(2, 2, 4, 4, _ |
"This is an example: ", Font:="Arial") |
Set t = s.Text |
Set tr = t.Story.InsertAfter("бвгдежзийклмнопрстуфхц") |
tr.CharSet = cdrCharSetGreek |
tr.LanguageID = cdrGreek |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.