And if "dwBuild >= 22000" then it's Windows 11. What does your "ucs" abbreviation stand for?
My CodeBank Projects: Pure VB6 MultiThreading || RichEdit and MsftEdit Unicode Textbox || Unicode Captions for Intrinsic Controls || Unicode InputBox with New Edit Styles || Unicode PopupMenu Captions and Radio Buttons || Add/Modify UDTs to/from VB6 Collections || RegFree usage of ActiveX DLLs without Manifests || VB6 Capture any Window with WinRT / Windows.Graphics.Capture || VB6 "Per-Monitor" DPI Aware
Forum Rules
Re: [VB6/VBA/twinBASIC] The quickest way to the real Windows version: KUSER_SHARED_DA
Reply With Quote