This property is True if Title is enabled.
object.TitleEnabled
Part | Attribute | Type | Description |
---|---|---|---|
object |
Required | The object always implements the
ISCaseType interface |
bool
Display TitleEnabled for the case types.
Dim aFilter
Dim aCaseTypes, aCaseType
Dim aMessage
Dim i
Set aFilter = Profile.CreateCaseTypesFilter
aFilter.Description = "Case Type 1"
set aCaseTypes = Profile.LoadCaseTypes(aFilter)
aMessage = "Case Types Count = " & aCaseTypes.Count
for i = 0 to aCaseTypes.Count - 1
set aCaseType = aCaseTypes.Item(i)
aMessage = aMessage & vbNewLine &_
"Title: " & aCaseType.Title & vbNewLine &_
"Code: " & aCaseType.Code & vbNewLine &_
"Description: " & aCaseType.Description& vbNewLine &_
"Title Enabled: " & aCaseType.TitleEnabled & vbNewLine &_
"Color Enabled: " & aCaseType.ColorEnabled & vbNewLine &_
"Color: " & HEX(aCaseType.Color) & vbNewLine
next
Profile.MsgBox(aMessage)
In Profile Client v8 on User Interface Title can be found in
.