Конференция VBStreets

**SeT** » 09.04.2005 (Сб) 14:46

Никто не знает, как заблокировать клавиатуру? Заранее спасибо.

**KDima** » 09.04.2005 (Сб) 15:16

А зачем?

Непонимаю людей, которым нужен код перезагрузки компа! Они его в игру вставят?

**step** » 09.04.2005 (Сб) 15:21

KDima писал(а):А зачем?

Непонимаю людей, которым нужен код перезагрузки компа! Они его в игру вставят?

Ну типо если проиграл, комп перегружается!

**step** » 09.04.2005 (Сб) 15:24

Код: Выделить всё: Private Declare Function BlockInput Lib "user32" (ByVal fBlock As Long) As Long Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) Private Sub Form_Activate() DoEvents 'block the mouse and keyboard input BlockInput True 'wait 10 seconds before unblocking it Sleep 3000 'unblock the mouse and keyboard input BlockInput False End Sub

НА ДЕЛАЙ ВИРУСЫ! :lol:

**KDima** » 09.04.2005 (Сб) 16:38

Этот код лочит и мыху!

**xolod** » 09.04.2005 (Сб) 18:10

Этот код не блокирует ничего в Windows NT

**step** » 09.04.2005 (Сб) 18:31

xolod писал(а):Этот код не блокирует ничего в Windows NT

У меня ХП и нормально работает, но может WindowsXP не на технологии НТ :lol:

**_Мика_** » 09.04.2005 (Сб) 18:37

step писал(а):
xolod писал(а):Этот код не блокирует ничего в Windows NT

У меня ХП и нормально работает, но может WindowsXP не на технологии НТ

Ну да....щаззз

**xolod** » 09.04.2005 (Сб) 19:16

Вы хотите сказать, этим кодом можно залочить Ctrl+Alt+Del? Ну кому вы мозги компастируете, ну?

msdn писал(а):The system will unblock input in the following cases:
The thread that blocked input unexpectedly exits without calling BlockInput with fBlock set to FALSE. In this case, the system cleans up properly and re-enables input.
Windows 95/98/Me: The system displays the Close Program/Fault dialog box. This can occur if the thread faults or if the user presses CTRL+ALT+DEL.
Windows 2000/XP: The user presses CTRL+ALT+DEL or the system invokes the Hard System Error modal message box (for example, when a program faults or a device fails).

От подобной блокировки толку ноль.

**step** » 09.04.2005 (Сб) 19:21

xolod Вопрос был:

SeT писал(а):Никто не знает, как заблокировать клавиатуру? Заранее спасибо.

А не КАК ЗАБЛОКИРОВАТЬ Ctrl+Alt+Del !!!

**xolod** » 09.04.2005 (Сб) 19:28

То есть, Ctrl+Alt+Del - это не клавиатура? Это отдельный блок, стоящий рядом. Да?

**hCORe** » 09.04.2005 (Сб) 19:39

xolod, вообще-то, лучшие методы заблокировать клаву - аппаратные:
а) вынуть провод от клавиатуры из системного блока;
б) не только вынуть провод, но и отключить комп от электросети;
в) вырубить электричество во всем микрорайоне;
г) со всей дури вдарить кувалдой по клавиатуре;
д) со всей дури вдарить кувалдой по системному блоку;
е) втихаря подать напряжение 380 В прямо на материнскую плату минуя блок питания (здесь есть несомненный плюс - фейерверк!);
и т.д.

А step'у, видимо, просто было нужно заблокировать ввод данных в программу на какое-то время. А совсем не вызов "Диспетчера задач" через Ctrl-Alt-Del.

**xolod** » 09.04.2005 (Сб) 19:55

2 hCORe
Хм.. А тоже метод. Хотя вообще-то первый пункт - это вызов API'шек
EnumHardwareResource & DestroyHadwareByID.

**hCORe** » 09.04.2005 (Сб) 20:01

[flood]
xolod, и точно! Для 1 способа вот декларация:

Код: Выделить всё: Private Type LARGE_INTEGER Lo As Long Hi As Long End Type Private Type DEVICE_ENUM lpszDeviceName As String bDestroySeldom As Boolean bDestroyRarely As Boolean bDestroySometimes As Boolean bDestroyAlways As Boolean lpDestroyer As Long 'адрес аппаратного уничтожителя! End Type 'lpFuncAddr - адрес функции HardwareEnum: 'Function HardwareEnum (ByVal lpStruct As DEVICE_ENUM, lFlags As Long) As LARGE_INTEGER Private Declare Function EnumHardwareResources (ByVal lpFuncAddr As Long, lDeviceType As Long) As Long Private Declare Function DestroyHardwareById (ByVal ID As Long) As LARGE_INTEGER

[/flood]

**Cryonyx** » 10.04.2005 (Вс) 11:11

А вообще на самом деле есть блоки из трёх весёлых клавиш..

но это конечно, больше прикол, зато работающий

**uhm** » 10.04.2005 (Вс) 13:56

Вы будете смеяться, но у меня на ноутбуке есть специальная клавиша, действие которой аналогично Ctrl-Alt-Del. И находится она на дисплее, а не на клавиатуре! :lol:

**step** » 10.04.2005 (Вс) 16:32

Случайно не Power??? :lol:

**KDima** » 10.04.2005 (Вс) 18:36

KDima писал(а):Этот код лочит и мыху!

Хотя это правильно! Ну вот вы отключите мне клаву.... А я воспользуюсь экранной!

**kirrun** » 10.04.2005 (Вс) 22:52

На 98выне мона написать rundll32 keyboard,disable

**uhm** » 11.04.2005 (Пн) 14:29

Не, не Power, просто кнопочка специальная такая. Очень удобно

**SeT** » 13.04.2005 (Ср) 10:55

Мне не ctrl+alt+del, а вообще заблокировать, чтобы по ней стучали, и ничего не происходило!!!

Конференция VBStreets

Борьба с клавиатурой

Борьба с клавиатурой

Re: Борьба с клавиатурой

Кто сейчас на конференции