Автор Тема: Блокирование нажатия )  (Прочитано 325 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Эта тема содержит сообщение, помеченное как лучший ответ. Кликните здесь для перехода к этому сообщению.

Оффлайн zelich [?]

  • Новичок
  • *
  • Сообщений: 98
  • Репутация: 0
    • Награды
Блокирование нажатия )
« Создано: Март 20, 2019, 00:06:01 »
Версия AutoIt: 3.

Описание:Есть скрипт блокирующий нажати 0-9
Как ещё заблокировать ")"?
(нажмите для показа/скрытия)

Примечания:
Помогите пожалуйста

Русское сообщество AutoIt

Блокирование нажатия )
« Отправлен: Март 20, 2019, 00:06:01 »

Оффлайн CreatoR [?]

  • Администратор
  • *
  • Сообщений: 8013
  • Репутация: 2304
  • Пол: Мужской
  • AutoIt is simple, subtle, elegant
    • CreatoR's Lab
    • Награды
  • Версия AutoIt: 3.3.10.2
Re: Блокирование нажатия )
« Ответ #1, Отправлен: Март 20, 2019, 00:28:09 »
Код: AutoIt [Выделить]
HotKeySet('+{Esc}', '_Exit')

Global $aBlock_Keys[] = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, '-', '=', '\']
Global $sBlock_Modifier = '+'

For $i = 0 To UBound($aBlock_Keys) - 1
    HotKeySet($aBlock_Keys[$i], '_Block')
   
    If $sBlock_Modifier Then
        HotKeySet($sBlock_Modifier & $aBlock_Keys[$i], '_Block')
    EndIf
Next

While 1
    Sleep(10)
WEnd

Func _Block()
    ;Nothing
EndFunc

Func _Exit()
    Exit
EndFunc



Правила, Поиск, Супер тема


AutoIt is simple, subtle, elegant.


«Не оказываю тех. поддержку через ПМ/ICQ, и по электронной почте - для этого есть форум. (C)»
«Законы Мэрфи неоспоримы!»


Мои работы

Оффлайн zelich [?]

  • Новичок
  • *
  • Сообщений: 98

  • Автор темы
  • Репутация: 0
    • Награды
Re: Блокирование нажатия )
« Ответ #2, Отправлен: Март 20, 2019, 01:02:29 »
CreatoR , а если нужен 0? Num ?

Оффлайн CreatoR [?]

  • Администратор
  • *
  • Сообщений: 8013
  • Репутация: 2304
  • Пол: Мужской
  • AutoIt is simple, subtle, elegant
    • CreatoR's Lab
    • Награды
  • Версия AutoIt: 3.3.10.2
Re: Блокирование нажатия )
« Ответ #3, Отправлен: Март 20, 2019, 02:41:30 »
zelich  [?]
Цитировать
а если нужен 0? Num ?
Не понял, нужно блокировать Num цифры?

Код: AutoIt [Выделить]
HotKeySet('+{Esc}', '_Exit')

Global $aBlock_Keys = StringSplit('{NUMPAD0},{NUMPAD1},{NUMPAD2},{NUMPAD3},{NUMPAD4},{NUMPAD5},{NUMPAD6},{NUMPAD7},{NUMPAD8},{NUMPAD9},0,1,2,3,4,5,6,7,8,9,-,=,\', ',')
Global $sBlock_Modifier = '+'

For $i = 1 To $aBlock_Keys[0]
    HotKeySet($aBlock_Keys[$i], '_Block')
   
    If $sBlock_Modifier Then
        HotKeySet($sBlock_Modifier & $aBlock_Keys[$i], '_Block')
    EndIf
Next

While 1
    Sleep(10)
WEnd

Func _Block()
    ;Nothing
EndFunc

Func _Exit()
    Exit
EndFunc


А вообще есть BlockInputEx.

Русское сообщество AutoIt

Re: Блокирование нажатия )
« Ответ #3 Отправлен: Март 20, 2019, 02:41:30 »

Оффлайн zelich [?]

  • Новичок
  • *
  • Сообщений: 98

  • Автор темы
  • Репутация: 0
    • Награды
Re: Блокирование нажатия )
« Ответ #4, Отправлен: Март 20, 2019, 08:16:05 »
zelich  [?]Не понял, нужно блокировать Num цифры?

Нет. Нужен блок только ")" (Shift+0)
« Последнее редактирование: Март 20, 2019, 08:46:18 от zelich »

Помечен как лучший ответ пользователем zelich Отправлен Март 20, 2019, 14:39:24

Оффлайн CreatoR [?]

  • Администратор
  • *
  • Сообщений: 8013
  • Репутация: 2304
  • Пол: Мужской
  • AutoIt is simple, subtle, elegant
    • CreatoR's Lab
    • Награды
  • Версия AutoIt: 3.3.10.2
Re: Блокирование нажатия )
« Ответ #5, Отправлен: Март 20, 2019, 12:28:54 »
zelich  [?]
Цитировать
Нужен блок только ")"
Код: AutoIt [Выделить]
...

Global $aBlock_Keys = StringSplit('0,+0,1,2,3,4,5,6,7,8,9,-,=,\', ',')
Global $sBlock_Modifier = ''

...


Оффлайн zelich [?]

  • Новичок
  • *
  • Сообщений: 98

  • Автор темы
  • Репутация: 0
    • Награды
Re: Блокирование нажатия )
« Ответ #6, Отправлен: Март 20, 2019, 14:39:14 »
CreatoR, спасибо!

Чуть уменьшил
(нажмите для показа/скрытия)

Русское сообщество AutoIt

Re: Блокирование нажатия )
« Ответ #6 Отправлен: Март 20, 2019, 14:39:14 »

 

Похожие темы

  Тема / Автор Ответов Последний ответ
11 Ответов
11534 Просмотров
Последний ответ Март 23, 2017, 01:38:24
от CreatoR
4 Ответов
10195 Просмотров
Последний ответ Декабрь 04, 2009, 09:47:21
от ODIE
3 Ответов
6197 Просмотров
Последний ответ Апрель 22, 2010, 11:39:59
от Orus
10 Ответов
12749 Просмотров
Последний ответ Ноябрь 24, 2015, 16:43:11
от Garrett
7 Ответов
6385 Просмотров
Последний ответ Ноябрь 15, 2010, 16:57:10
от Kaster
1 Ответов
2917 Просмотров
Последний ответ Январь 28, 2011, 13:43:03
от Yashied
3 Ответов
3771 Просмотров
Последний ответ Сентябрь 25, 2011, 07:24:54
от La2Angel
15 Ответов
5495 Просмотров
Последний ответ Сентябрь 29, 2011, 21:37:46
от La2Angel
2 Ответов
3333 Просмотров
Последний ответ Сентябрь 30, 2011, 00:07:51
от La2Angel
6 Ответов
3091 Просмотров
Последний ответ Январь 20, 2013, 01:24:48
от WSWR