IMetabase.CreateFindInfo

Синтаксис

CreateFindInfo: IMetabaseObjectFindInfo;

Описание

Метод CreateFindInfo позволяет создать объект для осуществления поиска объектов репозитория.

Поиск осуществляется методом IMetabase.Find.

Пример

Sub Main;

Var

MB: IMetabase;

MDescs: IMetabaseObjectDescriptors;

MDesc: IMetabaseObjectDescriptor;

FInfo: IMetabaseObjectFindInfo;

Begin

MB := MetabaseClass.Active;

FInfo := MB.CreateFindInfo;

FInfo.Text := "OBJTEST";

FInfo.Attribute := FindAttribute.NameOrIdent;

FInfo.WholeWordsOnly := False;

MDescs := MB.Find(FInfo);

For Each MDesc In MDescs Do

Debug.WriteLine("Идентификатор: " + MDesc.Id + "; Наименование: " + MDesc.Name);

End For;

End Sub Main;

После выполнения примера будет осуществлен поиск всех объектов, содержащих в своем наименовании, либо идентификаторе, текст "OBJTEST". Наименование и идентификатор найденных объектов будут выведены в консоль среды разработки.

См. также:

IMetabase