Müsstest du hier nicht eine 6 als Versionsnummer eintragen:
Delphi-Quellcode:
if (GetVersionEx(osVInfo)) and
(osVinfo.dwPlatformId = VER_PLATFORM_WIN32_NT) and
(osVinfo.dwMajorVersion >= 6)) then
Quelle: constructor TAeroGlass.Create(AOwner: TComponent);