James Posted August 30, 2007 Posted August 30, 2007 (edited) Hey all, For my latest project I need to know how to find if a key is pressed and which one. Case $iMsg = $HotKey Local $Dll = "user32.dll" For $Key = Asc(10) To Asc(12) $Pressed = _IsPressed($Key, $Dll) If $Pressed = "10" Then GUICtrlSetData($HotKey, "Shift + ") ElseIf $Pressed = "11" Then GUICtrlSetData($HotKey, "Ctrl + ") ElseIf $Pressed = "12" Then GUICtrlSetData($HotKey, "Alt + ") EndIf Next I only need: Shift, Ctrl & Alt. Then I need to know which other key is being pressed and set the keys into a Inputbox. Please help. The possible key combinations I would like to allow: Ctrl + F1-9/Numbers/Letters Ctrl + Shift + F1-9/Numbers/Letters Ctrl + Shift + Alt + F1-9/Numbers/Letters Alt + F1-9/Numbers/Letters Alt + Ctrl + F1-9/Numbers/Letters etc etc. -James Edited August 30, 2007 by JamesB Blog - Seriously epic web hosting - Twitter - GitHub - Cachet HQ
Generator Posted August 30, 2007 Posted August 30, 2007 This is what i did...Strip it off expandcollapse popup$Reciving = True Do For $i = 8 To 165 If _IsPressed(Hex($i, 2)) Then $Hex = Hex($i, 2) If $Hex = "08" Then GUICtrlSetData($keyinput, "{" & "BACKSPACE" & "}") If $Hex = "09" Then GUICtrlSetData($keyinput, "{" & "TAB" & "}") If $Hex = "0C" Then GUICtrlSetData($keyinput, "{" & "ClEAR" & "}") If $Hex = "0D" Then GUICtrlSetData($keyinput, "{" & "ENTER" & "}") If $Hex = "10" Then GUICtrlSetData($keyinput, "{" & "SHIFT" & "}") If $Hex = "11" Then GUICtrlSetData($keyinput, "{" & "CTRL" & "}") If $Hex = "12" Then GUICtrlSetData($keyinput, "{" & "ALT" & "}") If $Hex = "13" Then GUICtrlSetData($keyinput, "{" & "PAUSE" & "}") If $Hex = "14" Then GUICtrlSetData($keyinput, "{" & "CAPS LOCK" & "}") If $Hex = "1B" Then GUICtrlSetData($keyinput, "{" & "ESC" & "}") If $Hex = "20" Then GUICtrlSetData($keyinput, "{" & "SPACEBAR" & "}") If $Hex = "21" Then GUICtrlSetData($keyinput, "{" & "PAGE UP" & "}") If $Hex = "22" Then GUICtrlSetData($keyinput, "{" & "PAGE DOWN" & "}") If $Hex = "23" Then GUICtrlSetData($keyinput, "{" & "END" & "}") If $Hex = "24" Then GUICtrlSetData($keyinput, "{" & "HOME" & "}") If $Hex = "25" Then GUICtrlSetData($keyinput, "{" & "LEFT ARROW" & "}") If $Hex = "26" Then GUICtrlSetData($keyinput, "{" & "UP ARROW" & "}") If $Hex = "27" Then GUICtrlSetData($keyinput, "{" & "RIGHT ARROW" & "}") If $Hex = "28" Then GUICtrlSetData($keyinput, "{" & "DOWN ARROW" & "}") If $Hex = "29" Then GUICtrlSetData($keyinput, "{" & "SELECT" & "}") If $Hex = "2A" Then GUICtrlSetData($keyinput, "{" & "PRINT" & "}") If $Hex = "2B" Then GUICtrlSetData($keyinput, "{" & "EXECUTE" & "}") If $Hex = "2C" Then GUICtrlSetData($keyinput, "{" & "PRINT SCREEN" & "}") If $Hex = "2D" Then GUICtrlSetData($keyinput, "{" & "INS" & "}") If $Hex = "2E" Then GUICtrlSetData($keyinput, "{" & "DEL" & "}") If $Hex = "30" Then GUICtrlSetData($keyinput, "{" & "0" & "}") If $Hex = "31" Then GUICtrlSetData($keyinput, "{" & "1" & "}") If $Hex = "32" Then GUICtrlSetData($keyinput, "{" & "2" & "}") If $Hex = "33" Then GUICtrlSetData($keyinput, "{" & "3" & "}") If $Hex = "34" Then GUICtrlSetData($keyinput, "{" & "4" & "}") If $Hex = "35" Then GUICtrlSetData($keyinput, "{" & "5" & "}") If $Hex = "36" Then GUICtrlSetData($keyinput, "{" & "6" & "}") If $Hex = "37" Then GUICtrlSetData($keyinput, "{" & "7" & "}") If $Hex = "38" Then GUICtrlSetData($keyinput, "{" & "8" & "}") If $Hex = "39" Then GUICtrlSetData($keyinput, "{" & "9" & "}") If $Hex = "41" Then GUICtrlSetData($keyinput, "{" & "A" & "}") If $Hex = "42" Then GUICtrlSetData($keyinput, "{" & "B" & "}") If $Hex = "43" Then GUICtrlSetData($keyinput, "{" & "C" & "}") If $Hex = "44" Then GUICtrlSetData($keyinput, "{" & "D" & "}") If $Hex = "45" Then GUICtrlSetData($keyinput, "{" & "E" & "}") If $Hex = "46" Then GUICtrlSetData($keyinput, "{" & "F" & "}") If $Hex = "47" Then GUICtrlSetData($keyinput, "{" & "G" & "}") If $Hex = "48" Then GUICtrlSetData($keyinput, "{" & "H" & "}") If $Hex = "49" Then GUICtrlSetData($keyinput, "{" & "I" & "}") If $Hex = "4A" Then GUICtrlSetData($keyinput, "{" & "J" & "}") If $Hex = "4B" Then GUICtrlSetData($keyinput, "{" & "K" & "}") If $Hex = "4C" Then GUICtrlSetData($keyinput, "{" & "L" & "}") If $Hex = "4D" Then GUICtrlSetData($keyinput, "{" & "M" & "}") If $Hex = "4E" Then GUICtrlSetData($keyinput, "{" & "N" & "}") If $Hex = "4F" Then GUICtrlSetData($keyinput, "{" & "O" & "}") If $Hex = "50" Then GUICtrlSetData($keyinput, "{" & "P" & "}") If $Hex = "51" Then GUICtrlSetData($keyinput, "{" & "Q" & "}") If $Hex = "52" Then GUICtrlSetData($keyinput, "{" & "R" & "}") If $Hex = "53" Then GUICtrlSetData($keyinput, "{" & "S" & "}") If $Hex = "54" Then GUICtrlSetData($keyinput, "{" & "T" & "}") If $Hex = "55" Then GUICtrlSetData($keyinput, "{" & "U" & "}") If $Hex = "56" Then GUICtrlSetData($keyinput, "{" & "V" & "}") If $Hex = "57" Then GUICtrlSetData($keyinput, "{" & "W" & "}") If $Hex = "58" Then GUICtrlSetData($keyinput, "{" & "X" & "}") If $Hex = "59" Then GUICtrlSetData($keyinput, "{" & "Y" & "}") If $Hex = "5A" Then GUICtrlSetData($keyinput, "{" & "Z" & "}") If $Hex = "5B" Then GUICtrlSetData($keyinput, "{" & "Left Windows" & "}") If $Hex = "5C" Then GUICtrlSetData($keyinput, "{" & "Right Windows" & "}") If $Hex = "60" Then GUICtrlSetData($keyinput, "{" & "NUMPAD 0" & "}") If $Hex = "61" Then GUICtrlSetData($keyinput, "{" & "NUMPAD 1" & "}") If $Hex = "62" Then GUICtrlSetData($keyinput, "{" & "NUMPAD 2" & "}") If $Hex = "63" Then GUICtrlSetData($keyinput, "{" & "NUMPAD 3" & "}") If $Hex = "64" Then GUICtrlSetData($keyinput, "{" & "NUMPAD 4" & "}") If $Hex = "65" Then GUICtrlSetData($keyinput, "{" & "NUMPAD 5" & "}") If $Hex = "66" Then GUICtrlSetData($keyinput, "{" & "NUMPAD 6" & "}") If $Hex = "67" Then GUICtrlSetData($keyinput, "{" & "NUMPAD 7" & "}") If $Hex = "68" Then GUICtrlSetData($keyinput, "{" & "NUMPAD 8" & "}") If $Hex = "69" Then GUICtrlSetData($keyinput, "{" & "NUMPAD 9" & "}") If $Hex = "6A" Then GUICtrlSetData($keyinput, "{" & "NUMPAD *" & "}") If $Hex = "6B" Then GUICtrlSetData($keyinput, "{" & "NUMPAD +" & "}") If $Hex = "6C" Then GUICtrlSetData($keyinput, "{" & "NUMPAD Separator" & "}") If $Hex = "6D" Then GUICtrlSetData($keyinput, "{" & "NUMPAD -" & "}") If $Hex = "6E" Then GUICtrlSetData($keyinput, "{" & "NUMPAD ." & "}") If $Hex = "6F" Then GUICtrlSetData($keyinput, "{" & "NUMPAD /" & "}") If $Hex = "70" Then GUICtrlSetData($keyinput, "{" & "F1" & "}") If $Hex = "71" Then GUICtrlSetData($keyinput, "{" & "F2" & "}") If $Hex = "72" Then GUICtrlSetData($keyinput, "{" & "F3" & "}") If $Hex = "73" Then GUICtrlSetData($keyinput, "{" & "F4" & "}") If $Hex = "74" Then GUICtrlSetData($keyinput, "{" & "F5" & "}") If $Hex = "75" Then GUICtrlSetData($keyinput, "{" & "F6" & "}") If $Hex = "76" Then GUICtrlSetData($keyinput, "{" & "F7" & "}") If $Hex = "77" Then GUICtrlSetData($keyinput, "{" & "F8" & "}") If $Hex = "78" Then GUICtrlSetData($keyinput, "{" & "F9" & "}") If $Hex = "79" Then GUICtrlSetData($keyinput, "{" & "F10" & "}") If $Hex = "7A" Then GUICtrlSetData($keyinput, "{" & "F11" & "}") If $Hex = "7B" Then GUICtrlSetData($keyinput, "{" & "F12" & "}") If $Hex = "90" Then GUICtrlSetData($keyinput, "{" & "NUM LOCK" & "}") If $Hex = "91" Then GUICtrlSetData($keyinput, "{" & "SCROLL LOCK" & "}") If $Hex = "A4" Then GUICtrlSetData($keyinput, "{" & "LEFT MENU" & "}") If $Hex = "A5" Then GUICtrlSetData($keyinput, "{" & "RIGHT MENU" & "}") $Reciving = False EndIf Next Until $Reciving = False
James Posted August 30, 2007 Author Posted August 30, 2007 Thanks Gen but its not working. I have it under my input box event, in a Select loop. Any advice? Blog - Seriously epic web hosting - Twitter - GitHub - Cachet HQ
MrCreatoR Posted August 30, 2007 Posted August 30, 2007 Hi,Try to play with this example, i don't belive it, but it's actualy works! (it tooks me couple hours to make this) ...expandcollapse popup#include <GuiConstants.au3> For $i = 0 To 9 HotKeySet("^" & $i, "HotkeysEvent") HotKeySet("!" & $i, "HotkeysEvent") HotKeySet("+" & $i, "HotkeysEvent") Next Opt("GuiOnEventMode", 1) $Gui = GuiCreate("Test") GUISetOnEvent(-3, "Quit") $Input = GUICtrlCreateInput("", 20, 40, 300, 20, $ES_READONLY) GUICtrlSetBkColor(-1, 0xFFFFFF) GUISetState() AdlibEnable("CheckKeyPress", 150) While 1 Sleep(10) WEnd Func HotkeysEvent() $InputContent = GUICtrlRead($Input) $InputNum = StringRegExpReplace($InputContent, '(?i)(.*)\+\s', '') $HotkeyData = StringRegExpReplace($InputContent, '(?i)[0-9]', '') $NumData = StringRegExpReplace(@HotKeyPressed, '\^|!|\+', '') If $InputNum = "" Then GUICtrlSetData($Input, $InputContent & $NumData) ElseIf StringLen($InputNum) Then GUICtrlSetData($Input, $HotkeyData & $NumData) EndIf EndFunc Func CheckKeyPress() $LastKeyPress = _KeyIsPressed() If StringRegExp($LastKeyPress[0], "(?i)\{Ctrl\}|\{Shift\}|\{Alt\}") Then If $LastKeyPress[0] = "{Alt}" Then GUICtrlSetData($Input, "Alt + ") MouseClick("Left") Else GUICtrlSetData($Input, StringRegExpReplace($LastKeyPress[0], '\{|\}', '') & " + ") EndIf While 1 $CheckKeyPress = _KeyIsPressed() If $CheckKeyPress[0] <> $LastKeyPress[0] Then ExitLoop Sleep(10) WEnd $InputContent = GUICtrlRead($Input) $InputNum = StringRegExpReplace($InputContent, '(?i)(.*)\+\s', '') If $CheckKeyPress[0] <> -1 And StringIsDigit($CheckKeyPress[0]) And _ Not StringIsDigit($InputContent) And $InputNum = "" Then GUICtrlSetData($Input, $InputContent & $CheckKeyPress[0]) ElseIf StringRegExpReplace($InputContent, '(?i)(.*)\+\s', '') = '' Then GUICtrlSetData($Input, "") EndIf EndIf EndFunc Func _KeyIsPressed() Local $RetArr[2] = [-1, 0] Local $KeyBoardLayoutArr = StringSplit("{LMouse}|{RMouse}|{}|(MMouse}|{}|{}|{}|{BACKSPACE}|{TAB}|{}|{}|{}|{ENTER}|{}|{}|{SHIFT}|{CTRL}|{ALT}|{PAUSE}|{CAPSLOCK}|{}|{}|{}|{}|{}|{}|{ESC}|{}|{}|{}|{]|{SPACE}|{PGUP}|{PGDN}|{END}|{HOME}|{LEFT}|{UP}|{RIGHT}|{DOWN}|{SELECT}|{PRINTSCREEN}|{}|{PRINTSCREEN}|{INSERT}|{DEL}|{}|0|1|2|3|4|5|6|7|8|9|{}|{}|{}|{}|{}|{}|{}|a|b|c|d|e|f|g|h|i|j|k|l|m|n|o|p|q|r|s|t|u|v|w|x|y|z|{LWIN}|{RWIN}|{APPSKEY}|{}|{SLEEP}|{numpad0}|{numpad1}|{numpad2}|{numpad3}|{numpad4}|{numpad5}|{numpad6}|{numpad7}|{numpad8}|{numpad9}|{NUMPADMULT}|{NUMPADADD}|{}|{NUMPADSUB}|{NUMPADDOT}|{NUMPADDIV}|{F1}|{F2}|{F3}|{F4}|{F5}|{F6}|{F7}|{F8}|{F9}|{F10}|{F11}|{F12}|{F13}|{F14}|{F15}|{F16}|{F17}|{F18}|{F19}|{F20}|{F21}|{F22}|{F23}|{F24}|{}|{}|{}|{}|{}|{}|{}|{}|{NUMLOCK}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{SHIFT}|{SHIFT}|{CTRL}|{CTRL}|{ALT}|{ALT}|{BROWSER_BACK}|{BROWSER_FORWARD}|{BROWSER_REFRESH}|{BROWSER_STOP}|{BROWSER_SEARCH}|{BROWSER_FAVORITES}|{BROWSER_HOME}|{VOLUME_MUTE}|{VOLUME_DOWN}|{VOLUME_UP}|{MEDIA_NEXT}|{MEDIA_PREV}|{MEDIA_STOP}|{MEDIA_PLAY_PAUSE}|{LAUNCH_MAIL}|{LAUNCH_MEDIA}|{LAUNCH_APP1}|{LAUNCH_APP2}|{}|{}|;|{+}|,|{-}|.|/|`|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|{}|[|\|]|'", "|") Local $a_R For $i = 0 To 165 $a_R = DllCall("user32.dll", "int", "GetAsyncKeyState", "int", '0x' & Hex($i,2)) If Not @error And BitAND($a_R[0], 0x8000) = 0x8000 Then $RetArr[0] = $KeyBoardLayoutArr[$i] $RetArr[1] = Hex($i, 2) ExitLoop EndIf Next Return $RetArr EndFunc Func Quit() Exit EndFuncThe function _KeyPressed() i found here on forum (sorry, but i can not remember who is the author - thanks to him), but i changed it to my needs Spoiler Using OS: Win 7 Professional, Using AutoIt Ver(s): 3.3.6.1 / 3.3.8.1 AutoIt Russian Community My Work... Spoiler Projects: ATT - Application Translate Tool {new}| BlockIt - Block files & folders {new}| SIP - Selected Image Preview {new}| SISCABMAN - SciTE Abbreviations Manager {new}| AutoIt Path Switcher | AutoIt Menu for Opera! | YouTube Download Center! | Desktop Icons Restorator | Math Tasks | KeyBoard & Mouse Cleaner | CaptureIt - Capture Images Utility | CheckFileSize ProgramUDFs: OnAutoItErrorRegister - Handle AutoIt critical errors {new}| AutoIt Syntax Highlight {new}| Opera Library! | Winamp Library | GetFolderToMenu | Custom_InputBox()! | _FileRun UDF | _CheckInput() UDF | _GUIInputSetOnlyNumbers() UDF | _FileGetValidName() UDF | _GUICtrlCreateRadioCBox UDF | _GuiCreateGrid() | _PathSplitByRegExp() | _GUICtrlListView_MoveItems - UDF | GUICtrlSetOnHover_UDF! | _ControlTab UDF! | _MouseSetOnEvent() UDF! | _ProcessListEx - UDF | GUICtrl_SetResizing - UDF! | Mod. for _IniString UDFs | _StringStripChars UDF | _ColorIsDarkShade UDF | _ColorConvertValue UDF | _GUICtrlTab_CoverBackground | CUI_App_UDF | _IncludeScripts UDF | _AutoIt3ExecuteCode | _DragList UDF | Mod. for _ListView_Progress | _ListView_SysLink | _GenerateRandomNumbers | _BlockInputEx | _IsPressedEx | OnAutoItExit Handler | _GUICtrlCreateTFLabel UDF | WinControlSetEvent UDF | Mod. for _DirGetSizeEx UDF Examples: ScreenSaver Demo - Matrix included | Gui Drag Without pause the script | _WinAttach()! | Turn Off/On Monitor | ComboBox Handler Example | Mod. for "Thinking Box" | Cool "About" Box | TasksBar Imitation Demo Like the Projects/UDFs/Examples? Please rate the topic (up-right corner of the post header: Rating ) * === My topics === * ================================================== ================================================== AutoIt is simple, subtle, elegant. © AutoIt Team
James Posted August 31, 2007 Author Posted August 31, 2007 Thanks MsCreatoR, I have a problem. Firstly: It works! Secondly: When pressing a key and letting go it wont stay Thirdly: It will only accept one keypress. Any thoughts? Blog - Seriously epic web hosting - Twitter - GitHub - Cachet HQ
MrCreatoR Posted August 31, 2007 Posted August 31, 2007 Firstly: It works!Secondly: When pressing a key and letting go it wont stayThirdly: It will only accept one keypress.This is how it supose to be - it's the same (almoust) as when you set the hotkeys in files property dialog.About the part 3, you can add the second key by "playing" with the functions a litle, i am sorry, but i realy have no much time at this moment (maybe later)... Spoiler Using OS: Win 7 Professional, Using AutoIt Ver(s): 3.3.6.1 / 3.3.8.1 AutoIt Russian Community My Work... Spoiler Projects: ATT - Application Translate Tool {new}| BlockIt - Block files & folders {new}| SIP - Selected Image Preview {new}| SISCABMAN - SciTE Abbreviations Manager {new}| AutoIt Path Switcher | AutoIt Menu for Opera! | YouTube Download Center! | Desktop Icons Restorator | Math Tasks | KeyBoard & Mouse Cleaner | CaptureIt - Capture Images Utility | CheckFileSize ProgramUDFs: OnAutoItErrorRegister - Handle AutoIt critical errors {new}| AutoIt Syntax Highlight {new}| Opera Library! | Winamp Library | GetFolderToMenu | Custom_InputBox()! | _FileRun UDF | _CheckInput() UDF | _GUIInputSetOnlyNumbers() UDF | _FileGetValidName() UDF | _GUICtrlCreateRadioCBox UDF | _GuiCreateGrid() | _PathSplitByRegExp() | _GUICtrlListView_MoveItems - UDF | GUICtrlSetOnHover_UDF! | _ControlTab UDF! | _MouseSetOnEvent() UDF! | _ProcessListEx - UDF | GUICtrl_SetResizing - UDF! | Mod. for _IniString UDFs | _StringStripChars UDF | _ColorIsDarkShade UDF | _ColorConvertValue UDF | _GUICtrlTab_CoverBackground | CUI_App_UDF | _IncludeScripts UDF | _AutoIt3ExecuteCode | _DragList UDF | Mod. for _ListView_Progress | _ListView_SysLink | _GenerateRandomNumbers | _BlockInputEx | _IsPressedEx | OnAutoItExit Handler | _GUICtrlCreateTFLabel UDF | WinControlSetEvent UDF | Mod. for _DirGetSizeEx UDF Examples: ScreenSaver Demo - Matrix included | Gui Drag Without pause the script | _WinAttach()! | Turn Off/On Monitor | ComboBox Handler Example | Mod. for "Thinking Box" | Cool "About" Box | TasksBar Imitation Demo Like the Projects/UDFs/Examples? Please rate the topic (up-right corner of the post header: Rating ) * === My topics === * ================================================== ================================================== AutoIt is simple, subtle, elegant. © AutoIt Team
James Posted August 31, 2007 Author Posted August 31, 2007 Okey dokey. Thanks for the help though. Blog - Seriously epic web hosting - Twitter - GitHub - Cachet HQ
James Posted August 31, 2007 Author Posted August 31, 2007 I tried to edit Generators code: expandcollapse popupFunc Recieve() $Reciving = True Do For $i = 30 To 161 If _IsPressed(Hex($i, 2)) Then $Hex = Hex($i, 2) If $Hex = "30" Then GUICtrlSetData($HotKey, "{" & "0" & "}") If $Hex = "31" Then GUICtrlSetData($HotKey, "{" & "1" & "}") If $Hex = "32" Then GUICtrlSetData($HotKey, "{" & "2" & "}") If $Hex = "33" Then GUICtrlSetData($HotKey, "{" & "3" & "}") If $Hex = "34" Then GUICtrlSetData($HotKey, "{" & "4" & "}") If $Hex = "35" Then GUICtrlSetData($HotKey, "{" & "5" & "}") If $Hex = "36" Then GUICtrlSetData($HotKey, "{" & "6" & "}") If $Hex = "37" Then GUICtrlSetData($HotKey, "{" & "7" & "}") If $Hex = "38" Then GUICtrlSetData($HotKey, "{" & "8" & "}") If $Hex = "39" Then GUICtrlSetData($HotKey, "{" & "9" & "}") If $Hex = "41" Then GUICtrlSetData($HotKey, "{" & "A" & "}") If $Hex = "42" Then GUICtrlSetData($HotKey, "{" & "B" & "}") If $Hex = "43" Then GUICtrlSetData($HotKey, "{" & "C" & "}") If $Hex = "44" Then GUICtrlSetData($HotKey, "{" & "D" & "}") If $Hex = "45" Then GUICtrlSetData($HotKey, "{" & "E" & "}") If $Hex = "46" Then GUICtrlSetData($HotKey, "{" & "F" & "}") If $Hex = "47" Then GUICtrlSetData($HotKey, "{" & "G" & "}") If $Hex = "48" Then GUICtrlSetData($HotKey, "{" & "H" & "}") If $Hex = "49" Then GUICtrlSetData($HotKey, "{" & "I" & "}") If $Hex = "4A" Then GUICtrlSetData($HotKey, "{" & "J" & "}") If $Hex = "4B" Then GUICtrlSetData($HotKey, "{" & "K" & "}") If $Hex = "4C" Then GUICtrlSetData($HotKey, "{" & "L" & "}") If $Hex = "4D" Then GUICtrlSetData($HotKey, "{" & "M" & "}") If $Hex = "4E" Then GUICtrlSetData($HotKey, "{" & "N" & "}") If $Hex = "4F" Then GUICtrlSetData($HotKey, "{" & "O" & "}") If $Hex = "50" Then GUICtrlSetData($HotKey, "{" & "P" & "}") If $Hex = "51" Then GUICtrlSetData($HotKey, "{" & "Q" & "}") If $Hex = "52" Then GUICtrlSetData($HotKey, "{" & "R" & "}") If $Hex = "53" Then GUICtrlSetData($HotKey, "{" & "S" & "}") If $Hex = "54" Then GUICtrlSetData($HotKey, "{" & "T" & "}") If $Hex = "55" Then GUICtrlSetData($HotKey, "{" & "U" & "}") If $Hex = "56" Then GUICtrlSetData($HotKey, "{" & "V" & "}") If $Hex = "57" Then GUICtrlSetData($HotKey, "{" & "W" & "}") If $Hex = "58" Then GUICtrlSetData($HotKey, "{" & "X" & "}") If $Hex = "59" Then GUICtrlSetData($HotKey, "{" & "Y" & "}") If $Hex = "5A" Then GUICtrlSetData($HotKey, "{" & "Z" & "}") If $Hex = "5B" Then GUICtrlSetData($HotKey, "{" & "Left Windows" & "}") If $Hex = "5C" Then GUICtrlSetData($HotKey, "{" & "Right Windows" & "}") If $Hex = "60" Then GUICtrlSetData($HotKey, "{" & "NUMPAD 0" & "}") If $Hex = "61" Then GUICtrlSetData($HotKey, "{" & "NUMPAD 1" & "}") If $Hex = "62" Then GUICtrlSetData($HotKey, "{" & "NUMPAD 2" & "}") If $Hex = "63" Then GUICtrlSetData($HotKey, "{" & "NUMPAD 3" & "}") If $Hex = "64" Then GUICtrlSetData($HotKey, "{" & "NUMPAD 4" & "}") If $Hex = "65" Then GUICtrlSetData($HotKey, "{" & "NUMPAD 5" & "}") If $Hex = "66" Then GUICtrlSetData($HotKey, "{" & "NUMPAD 6" & "}") If $Hex = "67" Then GUICtrlSetData($HotKey, "{" & "NUMPAD 7" & "}") If $Hex = "68" Then GUICtrlSetData($HotKey, "{" & "NUMPAD 8" & "}") If $Hex = "69" Then GUICtrlSetData($HotKey, "{" & "NUMPAD 9" & "}") If $Hex = "6A" Then GUICtrlSetData($HotKey, "{" & "NUMPAD *" & "}") If $Hex = "6B" Then GUICtrlSetData($HotKey, "{" & "NUMPAD +" & "}") If $Hex = "6C" Then GUICtrlSetData($HotKey, "{" & "NUMPAD Separator" & "}") If $Hex = "6D" Then GUICtrlSetData($HotKey, "{" & "NUMPAD -" & "}") If $Hex = "6E" Then GUICtrlSetData($HotKey, "{" & "NUMPAD ." & "}") If $Hex = "6F" Then GUICtrlSetData($HotKey, "{" & "NUMPAD /" & "}") If $Hex = "70" Then GUICtrlSetData($HotKey, "{" & "F1" & "}") If $Hex = "71" Then GUICtrlSetData($HotKey, "{" & "F2" & "}") If $Hex = "72" Then GUICtrlSetData($HotKey, "{" & "F3" & "}") If $Hex = "73" Then GUICtrlSetData($HotKey, "{" & "F4" & "}") If $Hex = "74" Then GUICtrlSetData($HotKey, "{" & "F5" & "}") If $Hex = "75" Then GUICtrlSetData($HotKey, "{" & "F6" & "}") If $Hex = "76" Then GUICtrlSetData($HotKey, "{" & "F7" & "}") If $Hex = "77" Then GUICtrlSetData($HotKey, "{" & "F8" & "}") If $Hex = "78" Then GUICtrlSetData($HotKey, "{" & "F9" & "}") If $Hex = "79" Then GUICtrlSetData($HotKey, "{" & "F10" & "}") If $Hex = "7A" Then GUICtrlSetData($HotKey, "{" & "F11" & "}") If $Hex = "7B" Then GUICtrlSetData($HotKey, "{" & "F12" & "}") $Reciving = False EndIf Next Until $Reciving = False EndFunc But it does nothing. Blog - Seriously epic web hosting - Twitter - GitHub - Cachet HQ
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now