CheckForbiddenStrings: Boolean;
Свойство CheckForbiddenStrings определяет признак использования проверки пароля на вхождение запрещенных строк.
Если свойству установлено значение True, то при смене пароля будет осуществляться проверка на наличие в новом пароле запрещенных строк, указанных в списке ForbiddenStrings.
Sub Main;
Var
MB: IMetabase;
MS: IMetabaseSecurity;
MU: IMetabasePolicy;
PassPol: IMetabasePasswordPolicy;
Zapret: IStringList;
Begin
MB := MetabaseClass.Active;
MS := MB.Security;
MU := MS.Policy;
PassPol := MU.PasswordPolicy;
Zapret := PassPol.ForbiddenStrings;
PassPol.CheckForbiddenStrings := True;
Zapret.Clear;
Zapret.Add("abc");
Zapret.Add("123");
Zapret.Add("prognoz");
Zapret.Add("admin");
MS.Apply;
End Sub Main;
После выполнения примера будет установлена проверка пароля на вхождение запрещенных строк и в список будут добавлены четыре запрещенных значения.
См. также: