Пробую получить ProductId в Windows XP, все работает нормально, но в Windows 7 x64 ProductId вместо него выводит пустую строку, хотя он там есть по этому же адресу.
Код следующий:
Код:
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_Local_Machine;
Reg.OpenKey('\Software\Microsoft\Windows NT\CurrentVersion\', False);
Memo1.Lines.Add('Информация: '+Reg.ReadString('ProductName')+' - '+Reg.ReadString('ProductId'));
finally
Reg.Free;
end;
Где-то читал, что помогает использование:
Код:
Reg := TRegistry.Create(KEY_READ or KEY_WOW64_64KEY);
но delphi ругается:
Код:
[Error] Undeclared identifier: 'KEY_WOW64_64KEY'
Помогите исправить
