Enable dark mode support for the menus on 24H2. Tested this works as …

…expected myself.
jrsoftware · Oct 25, 2024 · 9df8ea0 · 9df8ea0
1 parent f41fde6
commit 9df8ea0
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/Components/NewUxTheme.pas b/Components/NewUxTheme.pas
@@ -1250,7 +1250,7 @@ function InitThemeLibrary: Boolean;
       DrawThemeParentBackground := GetProcAddress(ThemeLibrary, 'DrawThemeParentBackground');
       EnableTheming := GetProcAddress(ThemeLibrary, 'EnableTheming');
       if WindowsVersionAtLeast(10, 0, 18362) and { Windows 10 Version 1903 (May 2019 Update) }
-         WindowsVersionAtMost(10, 0, 22631) then begin { Windows 11 Version 23H2 (2023 Update) }
+         WindowsVersionAtMost(10, 0, 26100) then begin { Windows 11 Version 24H2 (2024 Update) }
         SetPreferredAppMode := GetProcAddress(ThemeLibrary, MakeIntResource(135));
         FlushMenuThemes := GetProcAddress(ThemeLibrary, MakeIntResource(136));
       end else begin

diff --git a/whatsnew.htm b/whatsnew.htm
@@ -81,6 +81,7 @@
   <li>Added shortcut to the <i>Options</i> menu item in the <i>Tools</i> menu (Ctrl+,).</li>
   <li>Removed the length limitation when entering a Sign Tool command and increased control height.</li>
   <li>Added a banner which is displayed to each user after each update and links to this revision history.</li>
+  <li>Enabled dark mode support for the menus on Windows 11 Version 24H2 (2024 Update).</li>
 </ul>
 <p><span class="head2">Other changes</span></p>
 <ul>