Что нового

не получается включить CAPSLOCK

C2H5OH

AutoIT Гуру
Сообщения
1,473
Репутация
333
Не получается из AutoIt включить CAPSLOCK.
Пробовал Send("{CAPSLOCK}") и Send("{CAPSLOCK on}") - оба варианта не срабатывают.
AutoIt 3.3.6.1
ос - Vista SP1

Что не так?
 

Zaramot

I ♥ AutoIt
Сообщения
1,160
Репутация
660
Код:
Opt('SendCapslockMode', 0)
 Send('{CAPSLOCK}')
 
Автор
C2H5OH

C2H5OH

AutoIT Гуру
Сообщения
1,473
Репутация
333
Спасибо! Всё работает.
Хотя снебольшой поправкой. Итоговый код получился

Код:
Opt('SendCapslockMode', 0)
Send('{CAPSLOCK}',0)
 

kaster

Мой Аватар, он лучший самый
Команда форума
Глобальный модератор
Сообщения
4,020
Репутация
626
C2H5OH
эта опция по умолчанию равна 0, от ее выставления результат не зависит
 

running-frag

why me?
Сообщения
441
Репутация
60
в догонку вопрос, а как сдетектить что CapsLock\NumLock\ScrollLock активны?
 

Zaramot

I ♥ AutoIt
Сообщения
1,160
Репутация
660
как сдетектить что CapsLock\NumLock\ScrollLock активны?
Код:
#Include <WinAPIEx.au3>

;CAPSLOCK
;0 - выключен, 1 - включен
If _WinAPI_GetKeyState(0x14) = 0 Then
	MsgBox(0, '', 'CAPSLOCK выключен')
Else
	MsgBox(0, '', 'CAPSLOCK включен')
EndIf

;NUMLOCK
;0 - выключен, 1 - включен
If _WinAPI_GetKeyState(0x90) = 0 Then
	MsgBox(0, '', 'NUMLOCK выключен')
Else
	MsgBox(0, '', 'NUMLOCK включен')
EndIf

;SCROLLLOCK
;0 - выключен, 1 - включен
If _WinAPI_GetKeyState(0x91) = 0 Then
	MsgBox(0, '', 'SCROLLLOCK выключен')
Else
	MsgBox(0, '', 'SCROLLLOCK включен')
EndIf
 
Верх