Count: Integer;
The Count property returns the number of primitives in element group.
Sub Main;
Var
MB: IMetabase;
ElemGroup: IDimElementGroup;
i: Integer;
Begin
MB:=MetabaseClass.Active;
If MB.ItemById("D_TO").Children.Count<>0 Then
ElemGroup:=MB.ItemById("D_TO").Children.Item(0).Bind As IDimElementGroup;
i:=ElemGroup.Count;
End If;
End Sub Main;
After executing the example the "i" variable contains the number of primitives in the first group of dictionary elements.
See also: