IconIndex: Integer;
Свойство IconIndex возвращает индекс пиктограммы объекта репозитория.
Sub Main;
Var
MB: IMetabase;
Desc: IMetabaseObjectDescriptor;
s: Integer;
Begin
MB := MetabaseClass.Active;
Desc := Mb.ItemById("Obj_1");
s := Desc.IconIndex;
End Sub Main;
После выполнения примера в переменной «S» будет содержаться индекс пиктограммы объекта репозитория с идентификатором "Obj_1".
См. также: