IRubricatorSegmentsSet.RemoveByKey

Синтаксис

RemoveByKey(Key: Integer): Boolean;

Параметры

Key. Ключ удаляемого сегмента.

Описание

Метод RemoveByKey удаляет сегмент из коллекции по ключу. Метод возвращает значение True, если удаление прошло успешно.

Пример

Для выполнения примера предполагается наличие в репозитории базы данных временных рядов с идентификатором «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 Segs.RemoveByKey(1);

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

End If;

End Sub Main;

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

См. также:

IRubricatorSegmentsSet