Страница: 1 |
Страница: 1 |
Вопрос: Прпаблема с эмуляцией клавиш, VB
Добавлено: 11.02.09 10:22
Автор вопроса: x_men
Народ помогите плиз, очень надо сэмулировать нажатие ПРАВОГО Контрола и скроллока, т.е. при нажатом правом контроле, должен два раза нажаться скроллок.
Ответы
Всего ответов: 12
Номер ответа: 1
Автор ответа:
GDK
Вопросов: 13
Ответов: 348
Профиль | | #1
Добавлено: 11.02.09 13:40
Private Declare Sub keybd_event Lib "user32.dll" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
'Платформа:
'Windows 95: Поддерживает.
'Windows 98: Поддерживает,но устарела;пользуйтесь SendInput.
'Windows NT: Требуется Windows NT 3.1 или выше,но устарела для Windows NT 4.0 с Service Pack 3 (SP3) или выше;пользуйтесь SendInput.
'Windows 2000: Поддерживает,но устарела;пользуйтесь SendInput.
'Windows CE: Требуется Windows CE 1.0 или выше,но устарела для Windows CE 2.0 или выше; пользуйтесь SendInput.
'keybd_event имитирует нажатия клавиш на клавиатуре.
'keybd_event не является функцией и не возвращает никаких значений.
'Параметры:
'bVk:Виртуальный код клавиши для имитации нажатия и отпускания клавиши.
'bScan:Зарезервировано -- установлено в 0.
'dwFlags: Комбинация следующих флагов определяет различные способы имитации:
'KEYEVENTF_EXTENDEDKEY - Префикс скэн-кода с префиксным байтом, имеющим значение &HE0.
'KEYEVENTF_KEYUP - Клавиша, указанная в bVk будет отпущена. Если этот флажок не определен, клавиша будет нажата.
'dwExtraInfo - Дополнительное 32-разрядное значение, связанное с событием клавиатуры.
'Константы
Private Const KEYEVENTF_EXTENDEDKEY = &H1
Private Const KEYEVENTF_KEYUP = &H2
Private Const VK_LBUTTON = &H1 'Левая кнопка мыши
Private Const VK_RBUTTON = &H2 'Правая кнопка мыши
Private Const VK_CANCEL = &H3 'Виртуальная клавиша Отмены, используемая для обработки комбинации клавиш Control-Break
Private Const VK_MBUTTON = &H4 'Средняя кнопка мыши
Private Const VK_BACK = &H8 'Backspace
Private Const VK_TAB = &H9 'Tab
Private Const VK_CLEAR = &HC '5 (на цифровой клавиатуре без Num Lock)
Private Const VK_RETURN = &HD 'Enter
Private Const VK_SHIFT = &H10 'Shift (любая)
Private Const VK_CONTROL = &H11 'Ctrl (любая)
Private Const VK_MENU = &H12 'Alt (любая)
Private Const VK_PAUSE = &H13 'Pause
Private Const VK_CAPITAL = &H14 'Caps Lock
Private Const VK_ESCAPE = &H1B 'Esc
Private Const VK_SPACE = &H20 'Spacebar
Private Const VK_PRIOR = &H21 'Page Up
Private Const VK_NEXT = &H22 'Page Down
Private Const VK_END = &H23 'End
Private Const VK_HOME = &H24 'Home
Private Const VK_LEFT = &H25 'Стрелка влево
Private Const VK_UP = &H26 'Стрелка вверх
Private Const VK_RIGHT = &H27 'Стрелка вправо
Private Const VK_DOWN = &H28 'Стрелка вниз
Private Const VK_V = &H56 'кнопка V
Private Const VK_F4 = &H73 'кнопка F4
Private Const VK_N = &H4E 'кнопка N
Номер ответа: 2
Автор ответа:
AgentFire
ICQ: 192496851
Вопросов: 75
Ответов: 3178
Профиль | | #2
Добавлено: 11.02.09 16:39
Номер ответа: 3
Автор ответа:
x_men
Вопросов: 1
Ответов: 5
Профиль | | #3
Добавлено: 11.02.09 16:48
ну впринципи задача именно такая стоит, но чет не клеится не могу программно вызвать синий экран.
Номер ответа: 4
Автор ответа:
Smith
ICQ: adamis@list.ru
Вопросов: 153
Ответов: 3632
Профиль | | #4
Добавлено: 12.02.09 12:57
Чёж ты за иксмэн тогда? шучу
AgentFire а прав на убийство драйвера что всегда достаточно?
Номер ответа: 5
Автор ответа:
AgentFire
ICQ: 192496851
Вопросов: 75
Ответов: 3178
Профиль | | #5
Добавлено: 12.02.09 14:01
да нет, это шутка)
Номер ответа: 6
Автор ответа:
Smith
ICQ: adamis@list.ru
Вопросов: 153
Ответов: 3632
Профиль | | #6
Добавлено: 12.02.09 20:15
Извини не понял, решил что ты еретик )
Номер ответа: 7
Автор ответа:
x_men
Вопросов: 1
Ответов: 5
Профиль | | #7
Добавлено: 13.02.09 09:11
Ребята, серьёзно, блин , очень надо шоб винда "щучьему веленью, по моему хотенью" вываливалась в синий экран!!!!
Номер ответа: 8
Автор ответа:
AgentFire
ICQ: 192496851
Вопросов: 75
Ответов: 3178
Профиль | | #8
Добавлено: 13.02.09 10:15
так просто все не бывает, товарисч
подвесить винду, это как убить человека - легко, нo надо решиться и все продумать
Номер ответа: 9
Автор ответа:
AgentFire
ICQ: 192496851
Вопросов: 75
Ответов: 3178
Профиль | | #9
Добавлено: 16.02.09 17:30
эмм.. это я так, ничего не подумайте )))
Номер ответа: 10
Автор ответа:
Smith
ICQ: adamis@list.ru
Вопросов: 153
Ответов: 3632
Профиль | | #10
Добавлено: 16.02.09 20:24
Да ладно, будем верить, что причина была веской.
Номер ответа: 11
Автор ответа:
AgentFire
ICQ: 192496851
Вопросов: 75
Ответов: 3178
Профиль | | #11
Добавлено: 18.02.09 17:53
нет, нет! я никого не убивал ~)
как ты мог подумать!*&
Номер ответа: 12
Автор ответа:
Smith
ICQ: adamis@list.ru
Вопросов: 153
Ответов: 3632
Профиль | | #12
Добавлено: 19.02.09 09:07
Ну мы то верим )