MaxFailedLogons: Integer;
The MaxFailedLogons property determines the number of failed logons or failed attempts to enter the current password during password change.
When logging in to the repository, the user will be locked if he exceeds the specified number of login attempts.
When changing the connected user password, the user session will be aborted if the user exceeds the number failed attempts to enter the current password.
To execute the example, add a link to the Metabase system assembly.
Sub UserProc;
Var
MB: IMetabase;
MS: IMetabaseSecurity;
Policy: IMetabasePolicy;
Lic: Object;
Begin
MB := MetabaseClass.Active;
// Get license to work with the security manager
Lic := MB.RequestLicense(UiLicenseFeatureType.Adm);
MS := MB.Security;
Policy := MS.Policy;
// Set the number of failed attempts
Policy.MaxFailedLogons := 6;
// Save changes
MS.Apply;
// Check in license
Lic := Null;
End Sub UserProc;
After executing the example the number of failed logons or failed attempts to enter the current password during password change.
See also: