Проблема с записью в реестр HKLM, Win7x64

[alumium]

Добрый день. Сегодня потребовалось создать функцию анализа приложений, однако возникла проблема записи реестра в ветку HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Windows\, UAC отключал, запускал от администратора (тоже не помогло), манифест исправил вот так:

<requestedPrivileges>
<requestedExecutionLevel
level="requireAdministrator"
uiAccess="false"/>
</requestedPrivileges>

ОС: Windows 7 Professional x64

Не изменяет ключ через Delphi:

Registry := TRegistry.Create(KEY_WRITE);
Registry.RootKey := HKEY_LOCAL_MACHINE;
Registry.OpenKey('SOFTWARE\Microsof t\Windows NT\CurrentVersion\Windows', True);
Registry.WriteInteger('LoadAppInit_ DLLs',1);
Registry.CloseKey;
Registry.Free;

Попытка запуска bat файла из моего exe, тоже не дала успеха (ручной запуск - работает):

@echo on
reg add "HKLM\SOFTWARE\Microsoft\Window s NT\CurrentVersion\Windows" /v "LoadAppInit_DLLs" /t reg_dword /d 1 /f
reg add "HKLM\SOFTWARE\Microsoft\Window s NT\CurrentVersion\Windows" /v "AppInit_DLLs" /t reg_sz /d "%1" /f
exit

PS: Это не будущий троян, а программа для локальной слежки за компьютером. Частный заказ.

[FaTaL]

У меня тоже не работало, пока не поставил слеши тут, может и тебе поможет

Registry.OpenKey('\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Windows\', True);

[p51x]

Итак, ваше приложение 64х битное?

[alumium]

нет, просто проверял на XP x32 работает, но win7 x64 не хочет

[alumium]

Сообщение от FaTaL

У меня тоже не работало, пока не поставил слеши тут, может и тебе поможет

Registry.OpenKey('\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Windows\', True);

Не работает (( C HKCU все как надо. Записать в HKLM\SOFTWARE\LanSpy тоже не выходит.

[p51x]

нет, просто проверял на XP x32 работает, но win7 x64 не хочет

Вы думаете я просто так спросил? http://msdn.microsoft.com/en-us/libr...(v=vs.85).aspx

[Virus25]

Может смениш параметр с Registry.OpenKey('SOFTWARE\Microsof t\Windows NT\CurrentVersion\Windows', True); на Registry.OpenKey('SOFTWARE\Microsof t\Windows NT\CurrentVersion\Windows', False); ты же не создаёшь ключ в реестре а просто проверяеш.

[alumium]

Сообщение от Virus25

Может смениш параметр с Registry.OpenKey('SOFTWARE\Microsof t\Windows NT\CurrentVersion\Windows', True); на Registry.OpenKey('SOFTWARE\Microsof t\Windows NT\CurrentVersion\Windows', False); ты же не создаёшь ключ в реестре а просто проверяеш.

А ты думаешь я не пробовал? Не работает, вопрос открыт

[Человек_Борща]

Как минимум вас UAC на юг пошлет за попытку пройти в HKLM из ограниченой учетки или не адм. пользователя.
Читайте про манифесты, чтобы сделать UAC дружелюбнее..
А вообще не суйтесь в HKLM, это системный раздел, туда только полный "рут" может ходить. А под пользователем, в HKCU лучше сидеть. Если уж надо HKLM, то проверяйте наличие соотв. прав у юзера и закрывайте программу если там все неок, выдав юзеру сообщение "только админ может меня использовать!!111 адынъ".

На 7-ке вообще проблематично "полного рута" добиться, а на деле чуть ли не у всех, поголовно, UAC кричит, за попытку писать в свою папку, если ПО установлено на системный диск, или лезть в HKLM раздел.

[alumium]

Сообщение от Человек_Борща

Как минимум вас UAC на юг пошлет за попытку пройти в HKLM из ограниченой учетки или не адм. пользователя.
Читайте про манифесты, чтобы сделать UAC дружелюбнее..
А вообще не суйтесь в HKLM, это системный раздел, туда только полный "рут" может ходить. А под пользователем, в HKCU лучше сидеть. Если уж надо HKLM, то проверяйте наличие соотв. прав у юзера и закрывайте программу если там все неок, выдав юзеру сообщение "только админ может меня использовать!!111 адынъ".

На 7-ке вообще проблематично "полного рута" добиться, а на деле чуть ли не у всех, поголовно, UAC кричит, за попытку писать в свою папку, если ПО установлено на системный диск, или лезть в HKLM раздел.

Вы наверно не обратили внимание на первую цитату, главного поста