OS detection

Hi,

Can you add new OS detection for Windows 10 and Windows Server Preview

(The name will change in Windows Server 2016 may be ....)

// --------------------------------------------------
else if (majorVer = 6) and (minorVer = 4) then
begin
if osVerInfo.wProductType = VER_NT_WORKSTATION then
Result := 'Windows 10'
else
Result := 'Windows Server Preview'
end
// --------------------------------------------------

Thank you

Yannick