IDynamicInstance.AttributeValueByKey

Fore Syntax

AttributeValueByKey(Element: Integer; AttributeKey: Integer): Variant;

Fore.NET Syntax

AttributeValueByKey[Element: uinteger; AttributeKey: uinteger]: object;

Parameters

Element. Index of dictionary element.

AttributeKey. Attribute key.

Description

The AttributeValueByKey property determines dictionary element attribute value by attribute key.

Fore Example

Executing the example requires a form containing the DimensionTree component with the DimensionTree1 identifier, the UiDimension component with the UiDimension1 identifier and the Button component with the Button1 identifier. Determine the UiDimension1 component as data source for the DimensionTree1 component. Data source for the UiDimension1 component must be MDM table dictionary with set dynamic loading of elements.

The example is a handler of the OnClick event for the Button1 component.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    Dim: IDynamicInstance;
    AttrsInst: IDimAttributesInstance;
    Element: Integer;
Begin
    Dim := UiDimension1.DimInstance As IDynamicInstance;
    // Get collection of dictionary attributes instances
    AttrsInst := Dim.CreateAttributesInstance;
    Element := DimensionTree1.FocusedElement;
    // Display real attribute value of selected element
    Debug.WriteLine("Real value of the first attribute of selected element: " +
        Dim.AttributeValueByKey(Element, 1));
    // Show displayed attribute value of selected element
    Debug.WriteLine("Displayed value of the first attribute of selected element: " +
        Dim.DisplayValueByKey(Element, 1));
End Sub Button1OnClick;

On clicking the Button1 button the console displays real and displayed values of the first attribute of selected element.

Fore.NET Example

The requirements and result of the Fore.NET example execution match with those in the Fore Example. Use Fore.NET analogs instead of Fore components.

Imports Prognoz.Platform.Interop.Dimensions;
…
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    Dim: IDynamicInstance;
    AttrsInst: IDimAttributesInstance;
    Element: uinteger;
Begin
    Dim := uiDimensionNet1.DimInstance As IDynamicInstance;
    // Get collection of dictionary attributes instances
    AttrsInst := Dim.CreateAttributesInstance();
    Element := dimensionTreeNet1.FocusedElement;
    // Display real attribute value of selected element
    System.Diagnostics.Debug.WriteLine("Real value of the first attribute of selected element: " +
        Dim.AttributeValueByKey[Element, 1]);
    // Show displayed attribute value of selected element
    System.Diagnostics.Debug.WriteLine("Displayed value of the first attribute of selected element: " +
        Dim.DisplayValueByKey[Element, 1]);
End Sub;