IRdsDictionaryElementData.DisplayAttribute

Синтаксис Fore

DisplayAttribute(AttributeKey: Integer): Variant;

Синтаксис Fore.NET

DisplayAttribute[AttributeKey: UInteger]: Object;

Параметры

AttributeKey - ключ атрибута, по которому необходимо получить отображаемое значение.

Описание

Свойство DisplayAttribute возвращает значение, которое будет отображаться по атрибуту с ключом AttributeKey для элемента.

Пример Fore

Для выполнения примера предполагается наличие в репозитория НСИ с идентификатором «NSI_1». В данном репозитории создан справочник НСИ с идентификатором «Dict_1».

Sub UserProc;
Var
    MB: IMetabase;
    DictInst: IRdsDictionaryInstance;
    Element: IRdsDictionaryElement;
Begin
    MB := MetabaseClass.Active;
    DictInst := MB.ItemByIdNamespace("Dict_1", MB.ItemById("NSI_1").Key).Open(Null) As IRdsDictionaryInstance;
    Element := DictInst.Elements.Item(1);
    Debug.WriteLine(Element.DisplayAttribute(DictInst.Attributes.FindById("NAME").Key));
End Sub UserProc;

После выполнения примера в консоль среды разработки будет выведено значение, которое будет отображаться для указанного элемента справочника по атрибуту наименование.

Пример Fore.NET

Для выполнения примера предполагается наличие в репозитория НСИ с идентификатором «NSI_1». В данном репозитории создан справочник НСИ с идентификатором «Dict_1».

Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    DictInst: IRdsDictionaryInstance;
    Element: IRdsDictionaryElement;
    NameValue: object;
Begin
    MB := Params.Metabase;
    DictInst := MB.ItemByIdNamespace["Dict_1", MB.ItemById["NSI_1"].Key].Open(Null) As IRdsDictionaryInstance;
    Element := DictInst.Elements.Item[1];
    NameValue := Element.DisplayAttribute[DictInst.Attributes.FindById("NAME").Key];
End Sub;

После выполнения примера в переменной «NameValue» будет выведено значение, которое будет отображаться для указанного элемента справочника по атрибуту наименование.

См. также:

IRdsDictionaryElementData