Команда OpenNavigator

Назначение

Открытие репозитория в навигаторе объектов.

Параметры использования

Параметры команды передаются в свойстве Data. Для работы команды в данном свойстве необходимо указать следующие значение:

Параметр Описание
IMetabase Репозиторий, который необходимо открыть в навигаторе объектов.

Особенности применения

Используется для открытия в навигаторе объектов репозитория, к которому уже осуществлено подключение.

Пример

Для выполнения примера предполагается наличие формы и расположенной на ней кнопки "Button1". В настройках подключений платформы имеется описание репозитория "Test". При подключении к нему будут использоваться имя пользователя и пароль "Test".

    Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
    Var
        MB: IMetabase;
        MAN: IMetabaseManager;
        Def: IMetabaseDefinition;
        Cred: ICredentials;
        Target: IUiCommandTarget;
        Context: IUiCommandExecutionContext;
    Begin
        MB := MetabaseClass.Active;
        MAN := MB.Definition.Manager;
        Cred := MAN.Packs.Item(0).Package.CreateCredentials(AuthenticationMode.Password);
        Def := MAN.Definitions.FindById("Test");
        (Cred As IPasswordCredentials).UserName := "Test";
        (Cred As IPasswordCredentials).Password := "Test";
        MB := Def.Open(Cred);
        Target := WinApplication.Instance.GetPluginTarget("Std");
        Context := Target.CreateExecutionContext;
        Context.Data := MB;
        Target.Execute("OpenNavigator", Context);
    End Sub Button1OnClick;

При нажатии на кнопку будет осуществлено подключение к репозиторию "Test". Окно репозитория будет открыто в навигаторе объектов.

См. также:

IUiCommandTarget.Execute