AutoHotkey Community

    REG_QWORD            := 11

    } Else If (sValueType == REG_QWORD) {
        VarSetCapacity(sValue, vValueSize:=8)
        DllCall("Advapi32.dll\RegQueryValueEx", "uint", hKey, "str", sValueName, "uint", 0, "uint", 0, "uint64*", sValue, "uint*", vValueSize)

  Loop
  {
    If Not GDFGamePath := RegEnumKey64("HKEY_LOCAL_MACHINE", "SOFTWARE\Microsoft\Windows\CurrentVersion\GameUX" . RegPath, (A_Index - 1))
      Break
    GDFGamePath%GameNr% := RegRead64("HKEY_LOCAL_MACHINE", "SOFTWARE\Microsoft\Windows\CurrentVersion\GameUX" . RegPath . "" . GDFGamePath, GamePath)
  }

RegEnumKey64(sRootKey, sKeyName, sValueName = "", DataMaxSize=1024) {
   HKEY_CLASSES_ROOT   := 0x80000000   ; http://msdn.microsoft.com/en-us/library/aa393286.aspx
   HKEY_CURRENT_USER   := 0x80000001
   HKEY_LOCAL_MACHINE   := 0x80000002
   HKEY_USERS         := 0x80000003
   HKEY_CURRENT_CONFIG   := 0x80000005
   HKEY_DYN_DATA      := 0x80000006
   HKCR := HKEY_CLASSES_ROOT
   HKCU := HKEY_CURRENT_USER
   HKLM := HKEY_LOCAL_MACHINE
   HKU    := HKEY_USERS
   HKCC := HKEY_CURRENT_CONFIG

   REG_NONE             := 0   ; http://msdn.microsoft.com/en-us/library/ms724884.aspx
   REG_SZ                := 1
   REG_EXPAND_SZ         := 2
   REG_BINARY            := 3
   REG_DWORD            := 4
   REG_DWORD_BIG_ENDIAN   := 5
   REG_LINK            := 6
   REG_MULTI_SZ         := 7
   REG_RESOURCE_LIST      := 8

   KEY_QUERY_VALUE := 0x0001   ; http://msdn.microsoft.com/en-us/library/ms724878.aspx
   KEY_WOW64_64KEY := 0x0100   ; http://msdn.microsoft.com/en-gb/library/aa384129.aspx (do not redirect to Wow6432Node on 64-bit machines)
   KEY_SET_VALUE   := 0x0002
   KEY_WRITE      := 0x20006
   KEY_ENUMERATE_SUB_KEYS := 0x0008
  ERROR_MORE_DATA := 234
  ERROR_NO_MORE_ITEMS := 259
  ERROR_SUCCESS := 0

   myhKey := %sRootKey%      ; pick out value (0x8000000x) from list of HKEY_xx vars
   IfEqual,myhKey,, {      ; Error - Invalid root key
      ErrorLevel := 3
      return ""
   }

   RegAccessRight := KEY_QUERY_VALUE + KEY_WOW64_64KEY + KEY_ENUMERATE_SUB_KEYS

   DllCall("Advapi32.dll\RegOpenKeyExA", "uint", myhKey, "str", sKeyName, "uint", 0, "uint", RegAccessRight, "uint*", hKey)   ; open key

  VarSetCapacity(sValue, vValueSize := 64000)
  If DllCall("Advapi32.dll\RegEnumKeyExA", "uint", hKey, "uint", sValueName, "str", sValue, "uint*", vValueSize, "uint", 0, "uint", 0, "uint", 0, "uint", 0)      ; get value type
    sValue := ""
   DllCall("Advapi32.dll\RegCloseKey", "uint", hKey)
   return sValue
}