IsShortcut: Boolean;
The IsShortcut property determines whether a shortcut is created for the existing repository object.
Available values:
True. The created repository object is a shortcut. One should determine a repository object, for which a shortcut will be created, in the IMetabaseObjectCreateInfo.Shortcut property.
False. The created repository object is not a shortcut.
Executing the example requires that the repository contains an object with the OBJTEST identifier.
Add a link to the Metabase system assembly.
Sub UserProc;
Var
MB: IMetabase;
CrInfo: IMetabaseObjectCreateInfo;
Begin
MB := MetabaseClass.Active;
CrInfo := MB.CreateCreateInfo;
CrInfo.Id := "Shortcut_OBJTEST";
CrInfo.Name := Shortcut for OBJTEST;
CrInfo.Parent := MB.Root;
CrInfo.Permanent := True;
CrInfo.Shortcut := MB.ItemById("OBJTEST");
CrInfo.IsShortcut := True;
MB.CreateObject(CrInfo);
End Sub UserProc;
After executing the example a shortcut for the OBJTEST object will be created in the root of the repository.
See also: