Цитата opel431:
Если это приложение работает в системе x64, то ключи (создает, ищет, удаляет и....) в Wow6432Node »
|
Я это понимаю . Я пытаюсь добиться, чтобы приложение 32 x работая в системе x64, удаляла ключи из HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\WIMMount, а не HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Microsoft\WIMMount
По старинке с помощью этого кода всё работает :
Код:
![Выделить весь код](images/misc/selectcode.png)
procedure TForm1.Button1Click(Sender: TObject);
var
Reg: TRegistry;
begin
Reg := TRegistry.Create();
if IsWindows64=true then begin
Reg.Access := $100 or KEY_ALL_ACCESS;
end;
try
Reg.RootKey := HKEY_LOCAL_MACHINE;
if Reg.KeyExists('\Software\Microsoft\WIMMount') then
Reg.DeleteKey('Software\Microsoft\WIMMount');
finally
Reg.Free;
end;end;