ClassId: Integer;
The ClassId property returns an identifier of the repository object class.
To check value of this property, use the MetabaseObjectClass enumeration.
Add a link to the Metabase system assembly.
Sub UserProc;
Var
MB: IMetabase;
Desc: IMetabaseObjectDescriptor;
S: Integer;
Begin
MB := MetabaseClass.Active;
Desc := Mb.ItemById("obj_1111");
S := Desc.ClassId;
End Sub UserProc;
After executing the example the identifier of the class of objects of the metadata base is contained in the "S" variable.
See also: