使用Inno Setup增强MinVersion设置？

Question

据为微软框架4.6.2的文档中，支持：

• 的Windows 7 SP1
• 的Windows 8.1
• 的Windows 10

这是不支持Windows 8。

Inno Setup的支持MinVersion属性：

http://www.jrsoftware.org/ishelp/topic_winvernotes.htm

那么，如何处理这个问题的设置？我们可以允许6.1.7601或更高，但是不允许允许6.2.9200？

谢谢。

安迪

Answer 1

从InitializeSetup event function使用GetWindowsVersion function来实现自定义的限制：

function MakeVer(Major, Minor, Build: Cardinal): Cardinal; 
begin 
    Result := (Major shl 24) + (Minor shl 16) + Build; 
end; 

function InitializeSetup(): Boolean; 
var 
    WindowsVersion: Cardinal; 
begin 
    Result := True; 

    WindowsVersion := GetWindowsVersion; 
    Log(Format('Windows Version: %x', [WindowsVersion])); 
    if (WindowsVersion < MakeVer(6, 1, 7601)) or 
    ((WindowsVersion >= MakeVer(6, 2, 0)) and (WindowsVersion < MakeVer(6, 3, 0))) then 
    begin 
    MsgBox(SetupMessage(msgWindowsVersionNotSupported), mbError, MB_OK); 
    Result := False; 
    end; 
end;