Getting Win 11 in Delphi

[robertjohns 0]

Hi

 

Is there any way to detect the Windows 11 in Delphi like the way

 

OS := TOSVersion.ToString ;

[Dave Nottage 493]

Using TOSVersion:

IsWindows11 := (TOSVersion.Major = 10) and (TOSVersion.Minor = 0) and (TOSVersion.Build >= 22000);

(At least until Windows 12?)

Where IsWindows11 is a Boolean.

[JonRobertson 39]

I don't understand the question. On my Windows 11 laptop, TOSVersion.ToString returns

Windows 11 (Version 22H2, OS Build 22621.2715, 64-bit Edition)

You could look at TOSVersion.Create in System.SysUtils.pas.

 

TOSVersion.Name should also return "Windows 11"

Edited November 24, 2023 by JonRobertson

[robertjohns 0]

30 minutes ago, JonRobertson said:

I don't understand the question. On my Windows 11 laptop, TOSVersion.ToString returns

Windows 11 (Version 22H2, OS Build 22621.2715, 64-bit Edition)

You could look at TOSVersion.Create in System.SysUtils.pas.

 

TOSVersion.Name should also return "Windows 11"

but on my system TOSVersion.ToString returns Windows 10

[Der schöne Günther 306]

The string "Windows 10" or "Windows 11" does not come from the Windows API, it is a string hardcoded into the Delphi RTL (System.RTLConsts.pas).

 

Delphi 10.2 is from 2017. Windows 11 was released 2021.

 

[dummzeuch 1392]

HKLM\Software\Microsoft\Windows NT\CurrentVersion

ProductName: REG_SZ

 

On my Windows 10 pro it says "Windows 10 pro".

There are several other entries that might be of interest, e.g. DisplayVersion="22H2".

 

Of course this can easily be manipulated by an administratorl