MaxFailedLogons: Integer;
The MaxFailedLogons property determines number of failed logons.
Sub Main;
Var
MB: IMetabase;
MS: IMetabaseSecurity;
MU: IMetabasePolicy;
Begin
MB:=MetabaseClass.Active;
MS:=MB.Security;
MU:=MS.Policy;
MU.MaxFailedLogons:=6;
MS.Apply;
End Sub Main;
After executing this example number of failed logons is "6".
See also: