Карта сайта Kansoftware
НОВОСТИУСЛУГИРЕШЕНИЯКОНТАКТЫ
Разработка программного обеспечения
KANSoftWare

Открыть меню кнопки ПУСК или запустить диалог запуска программ

Delphi , Рабочий стол , ПУСК

Открыть меню кнопки ПУСК или запустить диалог запуска программ

Оформил: DeeCo
Автор: http://www.swissdelphicenter.ch

// Show the Startmenu: 

keybd_event(VK_LWIN, MapVirtualKey(VK_LWIN, 0), 0, 0);
 keybd_event(VK_LWIN, MapVirtualKey(VK_LWIN, 0), KEYEVENTF_KEYUP, 0)

 //Show the Run-Dialog: 

keybd_event(VK_LWIN, MapVirtualKey(VK_LWIN, 0), 0, 0);
 keybd_event(Ord('R'), MapVirtualKey(Ord('R'), 0), 0, 0);
 keybd_event(Ord('R'), MapVirtualKey(Ord('R'), 0), KEYEVENTF_KEYUP, 0);
 keybd_event(VK_LWIN, MapVirtualKey(VK_LWIN, 0), KEYEVENTF_KEYUP, 0)

Here is a translation of the text into Russian:

Код, написанный на Delphi, предназначен для имитации событий клавиатуры для открытия меню "Пуск" или запуска диалога "Выполнить". Вот подробное описание того, что каждый раздел делает:

Открытие меню "Пуск":

  1. keybd_event(VK_LWIN, MapVirtualKey(VK_LWIN, 0), 0, 0);
    • Эта строка имитирует нажатие клавиши Windows (VK_LWIN) и ее немедленное освобождение.
  2. keybd_event(VK_LWIN, MapVirtualKey(VK_LWIN, 0), KEYEVENTF_KEYUP, 0);
    • Эта строка имитирует освобождение клавиши Windows.

Запуск диалога "Выполнить":

  1. keybd_event(VK_LWIN, MapVirtualKey(VK_LWIN, 0), 0, 0);
    • Та же строка, что и выше, имитирующая нажатие клавиши Windows.
  2. keybd_event(Ord('R'), MapVirtualKey(Ord('R'), 0), 0, 0);
    • Эта строка имитирует нажатие клавиши 'R' (Ord('R') - константа для кода ASCII 82).
  3. keybd_event(Ord('R'), MapVirtualKey(Ord('R'), 0), KEYEVENTF_KEYUP, 0);
    • Эта строка имитирует освобождение клавиши 'R'.
  4. keybd_event(VK_LWIN, MapVirtualKey(VK_LWIN, 0), KEYEVENTF_KEYUP, 0);
    • Та же строка, что и выше, имитирующая освобождение клавиши Windows.

Функция MapVirtualKey используется для преобразования кода виртуальной клавиши (например, VK_LWIN) в соответствующий код сканера. Функция Ord конвертирует символ ASCII в соответствующее целочисленное значение. Эти имитированные события клавиатуры, вероятно, будут работать на большинстве систем, поддерживающих Delphi, но помните, что это подход может не быть совместимым с всеми версиями Windows или конфигурациями.

Если вы ищете альтернативные решения, вы можете рассмотреть использование API, такие как ShellExecute или CreateProcess, для запуска диалога "Выполнить" программно, а не имитируя события клавиатуры.

Статья описывает способ открытия меню начала (Startmenu) или диалога запуска программ на компьютере с помощью использования функций keybd_event и MapVirtualKey.


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


Ваше мнение или вопрос к статье в виде простого текста (Tag <a href=... Disabled). Все комментарии модерируются, модератор оставляет за собой право удалить непонравившейся ему комментарий.

заголовок

e-mail

Ваше имя

Сообщение

Введите код




Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.



:: Главная :: ПУСК ::


реклама



©KANSoftWare (разработка программного обеспечения, создание программ, создание интерактивных сайтов), 2007
Top.Mail.Ru

Время компиляции файла: 2024-06-02 10:20:12
2024-07-13 07:02:58/0.0072228908538818/2