IMetabaseUser.IsLocked

Синтаксис

IsLocked: Boolean;

Описание

Свойство IsLocked определяет блокировку учетной записи указанного пользователя.

Пример

Sub Main;

Var

MB: IMetabase;

User: IMetabaseUser;

Users: IMetabaseUsers;

MS: IMetabaseSecurity;

Begin

MB:=MetabaseClass.Active;

MS:=MB.Security;

Users:=MS.Users;

User:=Users.Item(0);

User.IsLocked:=True;

MS.Apply;

End Sub Main;

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

См. также:

IMetabaseUser