Вызов стандартного диалога разграничения доступа пользователя в систему по времени.
Параметры команды передаются в свойстве Data. Для работы команды в данном свойстве необходимо указать следующее значение:
Тип значения | Описание |
IMetabaseUser,
ISecuritySubject |
Пользователь, для которого необходимо настроить разграничение прав доступа по времени. |
Отсутствуют
Для выполнения примера убедитесь, что в менеджере безопасности содержится пользователь USER.
Добавьте ссылки на системные сборки: Metabase, Ui.
Sub UserProc;
Var
Mb: IMetabase;
MbSec: IMetabaseSecurity;
User: ISecuritySubject;
Target: IUiCommandTarget;
Context: IUiCommandExecutionContext;
Lic: Object;
Begin
MB := MetabaseClass.Active;
// Получим лицензию для возможности работы с менеджером безопасности
Lic := Mb.RequestLicense(UiLicenseFeatureType.Adm);
MbSec := MB.Security;
User := MbSec.ResolveName("USER");
Target := WinApplication.Instance.GetPluginTarget("Adm");
Context := Target.CreateExecutionContext;
Context.Data := User;
Target.Execute("ShowHoursPolicy", Context);
// Сохраним изменения
MbSec.Apply;
// Освободим лицензию
Lic := Null;
End Sub UserProc;
После выполнения примера будет отображен диалог разграничения доступа в систему по времени для пользователя USER.
См. также: