IRubricatorSegmentsSet.FindByKey

Синтаксис

FindByKey(Key: Integer): IRubricatorSegment;

Параметры

Key. Ключ сегмента.

Описание

Метод FindByKey осуществляет поиск сегмента в коллекции по ключу.

Пример

Для выполнения примера предполагается наличие в репозитории базы данных временных рядов с идентификатором «OBJ_RUBRICATOR», в которой должны быть определены сегменты.

Sub Main;

Var

mb: IMetabase;

rubInst: IRubricatorInstance;

Rub: IRubricator;

Segs: IRubricatorSegments;

Begin

mb := MetabaseClass.Active;

Rub := mb.ItemById("OBJ_RUBRICATOR").Bind As IRubricator;

rubInst := (Rub As IMetabaseObjectDescriptor).Open(Null) As IRubricatorInstance;

Segs := rubInst.Segments;

If Segs.FindByKey(1) <> Null

Then Debug.WriteLine("Сегмент с ключом «1» найден.");

Else Debug.WriteLine("Сегмент с ключом «1» не найден.");

End If;

End Sub Main;

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

См. также:

IRubricatorSegmentsSet