ICustomDimElements.Add

Синтаксис

Add: Integer;

Описание

Метод Add осуществляет добавление нового элемента в справочник и возвращает номер строки, в которой он будет располагаться.

Комментарии

Элемент добавляется в конец списка. Значения всех атрибутов не установлены, для задания значений используйте свойство AttributeValue.

Пример

Для выполнения примера предполагается наличие в репозитории стандартного куба с идентификатором "CUBE_1".

Sub Main;

Var

MB: IMetabase;

MObj: IMetabaseObject;

Cube: IStandardCube;

CustDim: ICustomDimension;

DimElems: ICustomDimElements;

i: Integer;

Begin

MB:=MetabaseClass.Active;

MObj:=MB.ItemById("CUBE_1").Edit;

Cube:=MObj As IStandardCube;

CustDim:=Cube.FactDimension.Dimension As ICustomDimension;

DimElems:=CustDim.Elements;

i:=DimElems.Add;

DimElems.AttributeValue(i,0) := i;

DimElems.AttributeValue(i,1) := "Элемет " + i.ToString;

DimElems.AttributeValue(i,2) := i;

MObj.Save;

End Sub Main;

После выполнения примера в измерении фактов будет создан один новый элемент. Идентификатор куба - «CUBE_1».

См. также:

ICustomDimElements