Страница: 1 |
Вопрос: Сэмулировать нажатие клавиш! | Добавлено: 27.05.08 21:05 |
Автор вопроса: ![]() |
Мир Всем!
У меня есть ХР твикер, там есть опция,после того как пользователь нажимает Сtrl(нажать,удерживать)+ ScrollLock(2 раза) то вылетает "синий экран". Как мне сэмулировать нажатие этих клавиш? Попробовал следующий код: Option Explicit Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As Long, ByVal dwExtraInfo As Long) Const KEYEVENTF_KEYUP = &H2 Const VK_SCROLL = &H91 Const VK_RCONTROL = &HA3 Private Sub Command1_Click() Call keybd_event(VK_RCONTROL, 0, 0, 0) Call keybd_event(VK_SCROLL, 0, 0, 0) Call keybd_event(VK_SCROLL, 0, KEYEVENTF_KEYUP, 0) Call keybd_event(VK_SCROLL, 0, 0, 0) Call keybd_event(VK_SCROLL, 0, KEYEVENTF_KEYUP, 0) End Sub Private Sub Command2_Click() Call keybd_event(VK_RCONTROL, 0, KEYEVENTF_KEYUP, 0) Unload Me End Sub Вроде бы всё работает, а твикер не ловит, "синего экрана нет"??? Помогите пожалйста! Заранее благодарен!!!! |
Ответы | Всего ответов: 9 |
Номер ответа: 1 Автор ответа: ![]() ![]() ![]() ![]() Вопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | Цитата | #1 | Добавлено: 27.05.08 22:31 |
только вот "а твикер не ловит" нельзя сказть ибо твикер здесь не при чём. Это в винде такая фича |
Номер ответа: 2 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() Разработчик Offline Client Вопросов: 236 Ответов: 8362 |
Профиль | Цитата | #2 | Добавлено: 27.05.08 23:49 |
не понял, это баг в твикере или баг в винде? ![]() ![]() |
Номер ответа: 3 Автор ответа: ![]() ![]() ![]() ![]() Вопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | Цитата | #3 | Добавлено: 27.05.08 23:59 |
HACKER, вообще-то это вроде как реально фича такая. Там какая-то запись в реестр производится и тогда по Ctrl + Double ScrollLock вылетает BSoD. Я правда не проверял но неоднократно члышал об этом. |
Номер ответа: 4 Автор ответа: ![]() ![]() ![]() ![]() Вопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | Цитата | #4 | Добавлено: 28.05.08 00:01 |
И еще не понятно зачем это всё надо![]() |
Номер ответа: 5 Автор ответа: ![]() ![]() ![]() ![]() ![]() ![]() Администратор ICQ: 278109632 Вопросов: 42 Ответов: 3949 |
Web-сайт: Профиль | Цитата | #5 | Добавлено: 28.05.08 00:49 |
Твикером эта фича включается ![]() |
Номер ответа: 6 Автор ответа: ![]() ![]() ![]() ![]() Вопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | Цитата | #6 | Добавлено: 28.05.08 01:57 |
И еще не понятно зачем это всё надо ТС.
Особенно, если он использует твикер, а значит это вряд ли будет куль-вирус ![]() |
Номер ответа: 7 Автор ответа: ![]() ![]() ![]() ![]() ![]() Вопросов: 2 Ответов: 4 |
Профиль | Цитата | #7 | Добавлено: 28.05.08 21:20 |
Просто ну очень интересно почему "в ручную" работает, а с помощью проги на VB нет! ОбЫдно до слёз! Может я что-то недопонимаю? |
Номер ответа: 8 Автор ответа: ![]() ![]() ![]() ![]() ![]() Вопросов: 2 Ответов: 4 |
Профиль | Цитата | #8 | Добавлено: 28.05.08 21:49 |
Там в Твикере в реестр добавляеться следующий параметр:HKLM\system\CurrentControlSet\Services\i842prt\parametrs
Set value "CrushOnCtrlScroll"=dword:00000001(1) Вроде бы как в порт посылаеться какая-то фигня,вылетает BSOD. |
Номер ответа: 9 Автор ответа: ![]() ![]() ![]() ![]() Вопросов: 87 Ответов: 2795 |
Web-сайт: Профиль | Цитата | #9 | Добавлено: 28.05.08 23:21 |
может левый контрол? |
Страница: 1 |
|