ClassId: Integer;
Свойство ClassId возвращает идентификатор класса объекта репозитория.
Для проверки значения данного свойства используйте перечисление MetabaseObjectClass.
Добавьте ссылку на системную сборку Metabase.
Sub UserProc;
Var
MB: IMetabase;
Desc: IMetabaseObjectDescriptor;
S: Integer;
Begin
MB := MetabaseClass.Active;
Desc := Mb.ItemById("obj_1111");
S := Desc.ClassId;
End Sub UserProc;
После выполнения примера в переменной «S» будет содержаться идентификатор класса объектов базы метаданных.
См. также: