AttributeEx: FindAttributeEx;
AttributeEx: Prognoz.Platform.Intertop.Metabase.FindAttributeEx;
The AttributeEx property determines the attribute by values of which the search will be performed.
The FindAttributeEx.Ident value is set for the property by default, the value specified in the IMetabaseObjectFindInfo.Text property is searched among identifiers of the objects.
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;
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;
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.
See also: