IRdsDictionaryTranslation.IsDefault

Syntax

IsDefault: Boolean;

Description

The IsDefault property returns whether configured language is a default language for a dictionary.

Comments

Available values:

Example

Executing the example requires an MDM repository that contains the MDM dictionary. The repository identifier is RDS_REPO, the dictionary identifier is RDS_DICT. It is also necessary to add links to the Metabase and Rds system assemblies.

Sub UserSub;
Var
    Mb: IMetabase;
    RdsRepoDescr: IMetabaseObjectDescriptor;
    RdsDict: IRdsDictionary;
    DictTransl: IRdsDictionaryTranslations;
    i: Integer;
    Transl: IRdsDictionaryTranslation;
Begin
    Mb := MetabaseClass.Active;
    RdsRepoDescr := Mb.ItemById("RDS_REPO");
    RdsDict := Mb.ItemByIdNamespace("RDS_DICT", RdsRepoDescr.Key).Bind As IRdsDictionary;
    DictTransl := RdsDict.Translations;
    For i := 0 To DictTransl.Count - 1 Do
        Transl := DictTransl.Item(i);
        If Transl.IsDefault Then
            Debug.WriteLine(Transl.Name);
        End If;
    End For;
End Sub UserSub;

On executing the example, all settings used to translate a dictionary into different languages are reviewed by search method. If the language, for which the setting is determined, is the default language for a dictionary, a dictionary name is displayed in the console window in this language.

See also:

IRdsDictionaryTranslation