Команда ShowUserProp

Назначение

Вызов стандартного диалога настройки свойств пользователя.

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

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

Тип значения Описание
Элемент 1: IMetabaseSecurity Менеджер безопасности репозитория, посредством которого будет осуществляться получение прав пользователя.
Элемент 2: IMetabaseUser,
ISecuritySubject
Пользователь, для которого необходимо вывести диалог настройки.

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

Отсутствует

Пример

Для выполнения примера убедитесь, что в менеджере безопасности содержится пользователь USER.

Добавьте ссылки на системные сборки: Metabase, Ui.

Sub UserProc;
Var
    Mb: IMetabase;
    MbSec: IMetabaseSecurity;
    User: ISecuritySubject;
    Target: IUiCommandTarget;
    Context: IUiCommandExecutionContext;
    Data: Array;
Begin
    MB := MetabaseClass.Active;
    MbSec := MB.Security;
    User := MbSec.ResolveName(
"USER");
    Target := WinApplication.Instance.GetPluginTarget("Adm");
    Context := Target.CreateExecutionContext;
    Data := 
New Variant[2];
    Data[
0] := MbSec;
    Data[
1] := User;
    Context.Data := Data;
    Target.Execute(
"ShowUserProp", Context);
End Sub UserProc;

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Ui;

Public Shared Sub Main(Params: StartParams);
Var
    Mb: IMetabase;
    MbSec: IMetabaseSecurity;
    User: ISecuritySubject;
    Target: IUiCommandTarget;
    Context: IUiCommandExecutionContext;
    Data: Array;
    WinApp: WinApplicationClassClass;
Begin
    MB := Params.Metabase;
    MbSec := MB.Security;
    User := MbSec.ResolveName(
"USER");
    WinApp := 
New WinApplicationClassClass();
    Target := WinApp.Instance[
Null].GetPluginTarget("Adm");
    Context := Target.CreateExecutionContext();
    Data := 
New Object[2];
    Data[
0] := MbSec;
    Data[
1] := User;
    Context.Data := Data;
    Target.Execute(
"ShowUserProp", Context, Null);
End Sub;

После выполнения примера будет отображен диалог настройки свойств пользователя USER.

См. также:

IUiCommandTarget.Execute