Сдравствуйте уважаемые програмёры!
У меня такой вопрос:
как отслеживать все нажатия клавиш, независимо в каком окне?
Клавиатурный шпион
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Сообщений: 5
• Страница 1 из 1
- burik
- Постоялец
-
- Сообщения: 514
- Зарегистрирован: 03.11.2005 (Чт) 22:04
- Откуда: Беларусь, Рогачев
Клавиатурный шпион
burik » 16.08.2006 (Ср) 19:12
Между слухов, сказок, мифов,
просто лжи, легенд сомнений
мы враждуем жарче скифов
за несходство заблуждений
Игорь Губерман
просто лжи, легенд сомнений
мы враждуем жарче скифов
за несходство заблуждений
Игорь Губерман
- end3r
- Новичок
- Сообщения: 43
- Зарегистрирован: 23.01.2006 (Пн) 15:45
end3r » 16.08.2006 (Ср) 20:52
Это в модуле
На форму кладешь таймер
- Код: Выделить всё
Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
'Здесь кнопки, какие нужно отлавливать
Public Const VK_Q = &H51 'это Q
Public Const VK_ESCAPE = &H1B 'это escape и т.д.
Public Const VK_CONTROL = &H11
Public Const VK_RETURN = &HD
На форму кладешь таймер
- Код: Выделить всё
Private Sub Timer1_Timer()
' Здесь по нажатию клавиши escape прячется форма, поменяй на свое
If GetAsyncKeyState(VK_ESCAPE) Then
Form1.Hide
End If
End Sub
- IIIypuk
- Обычный пользователь
- Сообщения: 96
- Зарегистрирован: 10.06.2006 (Сб) 12:39
IIIypuk » 16.08.2006 (Ср) 22:04
вот пример
- Вложения
-
Hot_key.rar- (2.84 Кб) Скачиваний: 86
Есть 10 типов людей. Те, кто понимает двоичную систему исчисления, и те, кто не понимает...
Сообщений: 5
• Страница 1 из 1
Кто сейчас на конференции
Сейчас этот форум просматривают: AhrefsBot, Google-бот и гости: 122