FindByKey(Key: Integer): ICubeMetaUpdateAdditionalObject;
Key. Ключ искомого объекта.
Метод FindByKey осуществляет поиск объекта в коллекции по его ключу.
Если объект с указанным ключом не найден, то метод возвращает значение Null.
Для выполнения примера предполагается наличие в репозитории объекта репликации с идентификатором «CUBE_META_UPD» Также необходимо добавить ссылки на системные сборки «Cubes» и «Metabase».
Sub Button3OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Mb: IMetabase;
Update: ICubeMetaUpdateEx;
AdditionalObjs: ICubeMetaUpdateAdditionalObjects;
AddObj: ICubeMetaUpdateAdditionalObject;
Begin
Mb := MetabaseClass.Active;
Update := Mb.ItemById("CUBE_META_UPD").Bind As ICubeMetaUpdateEx;
AdditionalObjs := Update.AdditionalObjects;
AddObj := AdditionalObjs.FindByKey(1);
If AddObj <> Null Then
Debug.WriteLine("Объект найден");
Else
Debug.WriteLine("Объект не найден");
End If;
End Sub Button3OnClick;
После выполнения примера в окно консоли будет выведен результат поиска объекта с ключом «1» среди объектов, копируемых вместе с базой данных временных рядов.
См. также: