Howdy, Stranger!
It looks like you're new here. If you want to get involved, click one of these buttons!
Categories
In this Discussion
- Eugene Balabuev (LMD) March 2019
Add Support for Detect Windows Server 2019
Please enhance Code to detect Windows Server 2019
Add the block in procedure InitVersions;
10:
case Win32MinorVersion of
0: begin
LMDSIWindows10 := true;
if LMDSIProductType = SI_WORKSTATION then
LMDSysPlatform := pfWin10
else
begin
if Win32BuildNumber < 17763 then
LMDSysPlatform := pfWin2016server
else
LMDSysPlatform := pfWin2019server;
end
end;
end
case Win32MinorVersion of
0: begin
LMDSIWindows10 := true;
if LMDSIProductType = SI_WORKSTATION then
LMDSysPlatform := pfWin10
else
begin
if Win32BuildNumber < 17763 then
LMDSysPlatform := pfWin2016server
else
LMDSysPlatform := pfWin2019server;
end
end;
end
It looks very strange, stupid to do this in this way,
but its the Microsoft way
Comments