Почему `SetWindowsHookEx` выдаёт ошибку "access denied" в Windows 7 под Parallels

Delphi , Синтаксис , Справочник по API-функциям

Почему SetWindowsHookEx выдаёт ошибку "access denied" в Windows 7 под Parallels

Вопрос, поднятый пользователем, касается работы функции SetWindowsHookEx в среде Windows 7 на Mac Mini с использованием программы виртуализации Parallels. Функция SetWindowsHookEx предназначена для установки глобальных или локальных хуков, которые позволяют перехватывать определенные события в системе. Однако, при попытке использовать эту функцию в указанной среде, пользователь получает ошибку "access denied".

Описание проблемы

Пользователь столкнулся с проблемой, когда пытался установить глобальный хук нажатий клавиш в программе, написанной на Delphi XE4, которая работает корректно на других системах Windows 7. Вызов функции SetWindowsHookEx с указанием типа хука WH_JOURNALPLAYBACK возвращает ошибку "access denied". Пользователь указал, что он использовал соответствующий манифест с установленным атрибутом uiAccess="true", который должен был обеспечить необходимые привилегии для установки хука.

Контекст

В контексте вопроса пользователь предоставил исходный код вызова функции SetWindowsHookEx, а также пример манифеста, включенного в ресурсы программы. Он также упомянул, что пробовал различные варианты синтаксиса манифеста, а также запускал программу от имени администратора, но это не помогло решить проблему.

Подтвержденный ответ

Изначально пользователь предполагал, что проблема может быть связана с ограничениями виртуальной машины Parallels. Однако, после дополнительного анализа, было выяснено, что проблема заключалась в неправильной компиляции ресурсов. Используя инструмент XN_Resource_Editor, было обнаружено, что удаление файла ресурсов .RES перед сборкой проекта приводит к перекомпиляции ресурсов, что вводило в заблуждение результаты тестирования. Кроме того, было установлено, что Delphi XE4 использует свой собственный манифест по умолчанию, когда включены Runtime themes. Решением стало удаление ссылок на ресурсы в проекте и использование опции Project > Options, Application, Runtime Themes, для выбора пользовательского манифеста, а затем сборка и код-сигнатура исполняемого файла с запуском из подкаталога в C:\Program Files\.

Альтернативный ответ

Согласно дополнительным комментариям пользователя, правильная настройка манифеста и указание processorArchitecture="*" в манифесте, а также корректное указание уровня выполнения с uiAccess="true" в манифесте, должны были обеспечить корректную работу хука в виртуальной машине Parallels. Однако, первичной проблемой была неправильная интеграция манифеста в проект.

Пример кода

Пример вызова функции SetWindowsHookEx на Object Pascal (Delphi):

var
  HookHandle: THandle;
begin
  HookHandle := SetWindowsHookEx(WH_JOURNALPLAYBACK, @Playback, hInstance, 0);
  // Проверка результата вызова
  if HookHandle = 0 then
  begin
    // Обработка ошибки
    var LastError: Integer;
    GetLastError(LastError);
    // Вывести код ошибки для дальнейшего анализа
  end;
end;

Выводы

Важно правильно интегрировать манифест в проект и убедиться, что он корректно компилируется и включается в исполняемый файл. Также стоит учитывать, что запуск программы из подкаталога в C:\Program Files\ может быть необходимым условием для работы хуков, требующих повышенных привилегий.

Создано по материалам из источника по ссылке.

Проблема заключается в том, что функция `SetWindowsHookEx` выдает ошибку 'access denied' в операционной системе Windows 7, запущенной в виртуальной машине Parallels на Mac Mini, из-за неправильной компиляции ресурсов и необходимости использования пользов

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Справочник по API-функциям ::