CIMTranslationGroup (object)

ICIMTranslationGroup Interface

Description:

This object represents a group of CIMTranslation objects for a key value. All the CIMTranslation objects should have a value that is equivalent to the key in the language of the translation.

Example:

Sub TranslationGroup_Example()

    Dim oLangMap As
CIMLangMapper.CIMLangMap

    Dim oTranslationGroup As
CIMLangMapper.CIMTranslationGroup

    Dim oTranslation As
CIMLangMapper.CIMTranslation

    Set oLangMap =
CreateObject("CIMLangMapper.CIMLangMap")

    oLangMap.Load
"c:\trans.clm"

    Set oTranslationGroup =
oLangMap.LookupTranslationGroup("Wheel bearing")

    if Not oTranslationGroup Is Nothing
Then

      For Each oTranslation In
oTranslationGroup.Translations

        MsgBox
oTranslation.Value

      Next
oTranslation

End If
End Sub

ICIMTranslationGroup Interface
Description:	This object represents a group of CIMTranslation objects for a key value. All the CIMTranslation objects should have a value that is equivalent to the key in the language of the translation. Example: `Sub TranslationGroup_Example()` `Dim oLangMap As CIMLangMapper.CIMLangMap` `Dim oTranslationGroup As CIMLangMapper.CIMTranslationGroup` `Dim oTranslation As CIMLangMapper.CIMTranslation` `Set oLangMap = CreateObject("CIMLangMapper.CIMLangMap")` `oLangMap.Load "c:\trans.clm"` `Set oTranslationGroup = oLangMap.LookupTranslationGroup("Wheel bearing")` `if Not oTranslationGroup Is Nothing Then` `For Each oTranslation In oTranslationGroup.Translations` `MsgBox oTranslation.Value` `Next oTranslation` `End If` `End Sub`
See Also:	Key , Translations , CIMTranslations , CIMTranslation
Properties:	CurrentTranslationValue , Key , Parent , Translations
Methods:	AddTranslation