IMetabaseObjectDescriptor.IsShortcut

Синтаксис

IsShortcut: Boolean;

IsShortcut: boolean;

Описание

Свойство IsShortcut возвращает признак того, что данный объект является ярлыком на другой объект репозитория.

Свойство возвращает значение True, если данный объект является ярлыком для другого объекта репозитория.

Примечание. Если объект является ярлыком для объекта из другого репозитория, то данное свойство вернет значение False и для проверки необходимо также использовать свойство IMetabaseObjectDescriptor.IsLink.

Пример

Для выполнения примера предполагается наличие в репозитории объекта с идентификатором «ObjTest».

Добавьте ссылку на системную сборку Metabase.

Sub UserProc;
Var
    MB: IMetabase;
    MDesc: IMetabaseObjectDescriptor;
Begin
    MB := MetabaseClass.Active;
    MDesc := MB.ItemById("ObjTest");
    If MDesc.IsShortcut Then
        Debug.WriteLine(MDesc.Shortcut.Id);
    End If;
End Sub UserProc;
Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    MDesc: IMetabaseObjectDescriptor;
Begin
    MB := Params.Metabase;
    MDesc := MB.ItemById["ObjTest"];
    If MDesc.IsShortcut Then
        System.Diagnostics.Debug.WriteLine(MDesc.Shortcut.Id);
    End If;
End Sub;

После выполнения, если объект «ObjTest» является ярлыком, то в консоль среды разработки будет выведен идентификатор объекта, на который ссылается данный ярлык.

См. также:

IMetabaseObjectDescriptor