Remove(Index: Integer): Boolean;
Index. Индекс объекта в коллекции.
Метод Remove удаляет объект из коллекции по его индексу.
Значение параметра Index должно быть неотрицательным числом, но меньше значения свойства ICubeMetaUpdateAdditionalObjects.Count. Индекс первого объекта в коллекции - «0», последнего - «ICubeMetaUpdateAdditionalObjects.Count - 1». Нумерация индексов - сквозная.
Если удаление объекта прошло успешно, то метод возвращает значение True, значение свойства ICubeMetaUpdateAdditionalObjects.Count уменьшается на единицу; в обратном случае - False.
Для выполнения примера предполагается наличие в репозитории объекта репликации с идентификатором «CUBE_META_UPD» Также необходимо добавить ссылки на системные сборки «Cubes» и «Metabase».
Sub Button3OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Mb: IMetabase;
Update: ICubeMetaUpdateEx;
AdditionalObjs: ICubeMetaUpdateAdditionalObjects;
AddObj: Boolean;
Begin
Mb := MetabaseClass.Active;
Update := Mb.ItemById("CUBE_META_UPD").Edit As ICubeMetaUpdateEx;
AdditionalObjs := Update.AdditionalObjects;
AddObj := AdditionalObjs.Remove(1);
If AddObj Then
Debug.WriteLine("Объект удален");
Else
Debug.WriteLine("Объект не удален");
End If;
(Update As IMetabaseObject).Save;
End Sub Button3OnClick;
После выполнения примера в окно консоли будет выведен результат удаления объекта с индексом «1» среди объектов, копируемых вместе с базой данных временных рядов.
См. также: