IMetabaseObjectFindInfo.AttributeEx

Fore Syntax

ForeNET Syntax

AttributeEx: Prognoz.Platform.Intertop.Metabase.Metabase.FindAttributeEx;

Description

The AttributeEx property determines the attribute by values of which the search will be performed.

Comments

The FindAttributeEx.Ident value is set for the property by default, the value specified in the Text property is searched among identifiers of the objects.

Fore Example

To execute the example, add a link to the Metabase system assembly.

Sub UserProc;
Var
    MB: IMetabase;
    MDescs: IMetabaseObjectDescriptors;
    MDesc: IMetabaseObjectDescriptor;
    FInfo: IMetabaseObjectFindInfo;
Begin
    MB := MetabaseClass.Active;
    FInfo := MB.CreateFindInfo;
    FInfo.Text := "33";
    FInfo.AttributeEx := FindAttributeEx.Key;
    FInfo.WholeWordsOnly := False;
    //Search objects
    MDescs := MB.Find(FInfo);
    //View results
    For Each MDesc In MDescs Do
        Debug.WriteLine("Identifier: " + MDesc.Id + "; Name: " + MDesc.Name);
    End For;
End Sub UserProc;

After executing the example all objects containing the 33 value in the key will be searched. Names and identifiers of the found objects are displayed in the development environment console.

Fore.NET Example

The requirements and result of the Fore.NET example execution match with those in the Fore example.

Imports Prognoz.Platform.Interop.Metabase;

Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    MDescs: IMetabaseObjectDescriptors;
    MDesc: IMetabaseObjectDescriptor;
    FInfo: IMetabaseObjectFindInfo;
Begin
    MB := Params.Metabase;
    FInfo := MB.CreateFindInfo();
    FInfo.Text := "33";
    FInfo.AttributeEx := FindAttributeEx.fnaeKey;
    FInfo.WholeWordsOnly := False;
    //Search objects
    MDescs := MB.Find(FInfo);
    //View results
    For Each MDesc In MDescs Do
        System.Diagnostics.Debug.WriteLine(Identifier:  + MDesc.Id + "; Name: " + MDesc.Name);
    End For;
End Sub;