如何让Embarcadero RAD Studio Delphi 11兼容Windows XP

Delphi 11 Windows XP compatibility tweak
By Michal Mutl

As you likely noticed, Delphi 11 officially does not support Windows XP anymore. You can make your application compatible with XP again by simple set.
In Project Options|Building|Delphi Compiler|Linking set "Set OS Version fields in PE Headers" and "Set SubSystem Version fields in PE Headers" to "5.1".
Unless your application uses System.Threading.pas (TTask etc) you should run it under Windows XP with no problems. But if so, then you have to tweak this unit.
Threading objects actually use in their internals new TThread.GetTickCount64 method, which is hardwired to Windows API GetTickCount64 which is not available in Windows XP API.
Take this unit from "source\rtl\common" folder in Delphi 11 installation. Declare new loc