使用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;