IUiSecManagerParams.Active

Синтаксис Fore

Acitve : SecManagerMode;

Синтаксис Fore.NET

Active : Prognoz.Platform.Interop.Ui.SecManagerMode;

Описание

Свойство Active определяет активную вкладку при открытии менеджера безопаности.

Пример Fore

Для выполнения примера предполагается наличие формы и расположенной на ней кнопки «Button1». Подключите сборки Metabase, Ui.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    Target: IUiCommandTarget;
    Context: IUiCommandExecutionContext;
    SecParams: IUiSecManagerParams;
Begin
    Target := WinApplication.Instance.GetPluginTarget(
"Adm");
    Context := Target.CreateExecutionContext;
    SecParams := 
new UiSecManagerParams.Create;
    SecParams.Metabase := MetabaseClass.Active; 
// Задаем метабазу
    SecParams.Active := SecManagerMode.Classes; // Активируем вкладку «Классы»
    Context.Data := SecParams;
    Target.Execute(
"OpenNavigator", Context);
End Sub Button1OnClick;

После выполнения примера будет открыт менеджер безопасности на вкладке «Классы объектов».

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore. Вместо компонентов Fore используйте их Fore.NET аналоги.

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

Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
    
Var
    WinApp: WinApplication = New  WinApplicationClass_2();
    Target: IUiCommandTarget;
    Context: IUiCommandExecutionContext;
    SecParams: IUiSecManagerParams;
Begin
    Target := WinApp.GetPluginTarget(
"Adm");
    Context := Target.CreateExecutionContext();
    SecParams := new  UiSecManagerParams.Create();
    SecParams.Metabase := Self.Metabase; 
//Задаем метабазу
    SecParams.Active := SecManagerMode.smbcClasses; // Активируем вкладку «Классы»
    Context.Data := SecParams;
    Target.Execute(
"OpenNavigator",  Context,  Null);
        
End Sub;

См. также:

IUiSecManagerParams | OpenNavigator: Плагин "Adm"