Autoit send()
DB CAFE
thumb_up 추천메뉴 바로가기
- DBA { Oracle DBA 명령어 > DBA 초급 과정 > DBA 고급 과정 }
- 튜닝 { 오라클 튜닝 목록 }
- 모델링 { 데이터 모델링 가이드 }
Windows 키 커스터마이징[편집]
;~ See list of keys to detect here
;~ https://www.autoitscript.com/autoit3/docs/libfunctions/_IsPressed.htm
#include <Misc.au3>
#include <MsgBoxConstants.au3>
Local $hDLL = DllOpen("user32.dll")
Func lWinKeyPressed()
If (_IsPressed("5B", $hDLL)) Then
Return True
EndIf
EndFunc
Func rWinKeyPressed()
If (_IsPressed("5C", $hDLL)) Then
Return True
EndIf
EndFunc
Func leftKeyPressed()
If (_IsPressed("25", $hDLL)) Then
Return True
EndIf
EndFunc
Func rightKeyPressed()
If (_IsPressed("27", $hDLL)) Then
Return True
EndIf
EndFunc
Func upKeyPressed()
If (_IsPressed("26", $hDLL)) Then
Return True
EndIf
EndFunc
Func downKeyPressed()
If (_IsPressed("27", $hDLL)) Then
Return True
EndIf
EndFunc
Func spaceKeyPressed()
If (_IsPressed("20", $hDLL)) Then
Return True
EndIf
EndFunc
Func altKeyPressed()
If (_IsPressed("12", $hDLL)) Then
Return True
EndIf
EndFunc
Func ctrlKeyPressed()
If (_IsPressed("11", $hDLL)) Then
Return True
EndIf
EndFunc
Func shiftKeyPressed()
If (_IsPressed("10", $hDLL)) Then
Return True
EndIf
EndFunc
Func winKeyPressed()
If ( lWinKeyPressed() Or rWinKeyPressed() ) Then
Return True
EndIf
EndFunc
Func win_left()
If ( winKeyPressed() And leftKeyPressed() ) Then
Return True
EndIf
EndFunc
Func win_right()
If ( winKeyPressed() And rightKeyPressed() ) Then
Return True
EndIf
EndFunc
While 1
If win_left() Then
; Code: When keyes are pressed.
ConsoleWrite("Win+left Key is pressed." & @CRLF)
While win_left()
Sleep(50)
WEnd
; Code: When keyes are released.
ConsoleWrite("Win+left Key is released." & @CRLF)
ElseIf win_right() Then
; Code: When keyes are pressed.
ConsoleWrite("Win+right Key is pressed." & @CRLF)
While win_right()
Sleep(50)
WEnd
; Code: When keyes are released.
ConsoleWrite("Win+right Key is released." & @CRLF)
EndIf
;~ Sleep(250)
WEnd
DllClose($hDLL)