获取系统最小密码长度和复杂性

Question

在本地安全策略（PC-Control面板 - 管理 - 本地安全策略）中，有一个参数“密码的最小长度”和参数“密码必须符合复杂性要求”（true / false）。如何在Delphi中读取它们（适用于WinXpSp3-Win2003-Vista-Win7-Win2008（+ r2））？

我正在寻找类似的东西：

Function DetectSystemMinPassLength:integer;
begin
//?
end;

Function DetectSystemPassComplexity:boolean;
begin
//?
end;

其他问题： Delphi（或WinApi）函数中是否存在可以检查给定密码是否符合系统策略（或设置）的函数？

例如：

Function MyCheckPassComplexity (Password:string):boolean;
begin
// ???
end;

使用

MyCheckPassComplexity (' 12345 '); //result False

MyCheckPassComplexity (' MyCoolPassword9999 '); //result True

Answer 1

通常要阅读本地或组策略设置，您必须使用Group Policy Settings Reference for Windows and Windows Server，它基本上是一组excel文件，其中包含存储此类信息的Windows注册表项。不幸的是，在这种情况下，如果您检查这些帐户政策的参考（强制密码历史记录， 最长密码年龄，最短密码年龄，最短密码长度）您将找到此消息：

Password Policy security settings are not registry keys.

在root\RSOP\Computer命名空间中存在一组WMI类，例如RSOP_SecuritySettingBoolean，RSOP_SecuritySettingNumeric，RSOP_SecuritySettings以访问帐户策略，但这些类只有效（我的意思是检索信息）在域中的系统上，但在工作组中不起作用。

目前我认为您最好的选择是使用此命令将本地策略导出到ini文件（然后使用TIniFile类解析结果）

secedit.exe /export /cfg C:\Output\Policy.Ini

此命令将创建一个这样的文件

[Unicode]
Unicode=yes
[System Access]
MinimumPasswordAge = 0
MaximumPasswordAge = 42
MinimumPasswordLength = 0
PasswordComplexity = 0
PasswordHistorySize = 0

关于验证密码的第二个问题，您可以使用NetValidatePasswordPolicy WinAPI函数。