Jump to content

Recommended Posts



I have written a programm offering me a lot of hotkeys to work with windows. All in all there are 40 hotkeys defined now.

Now I made a portable version of it. But in this there are a lot of hotkeys useless. So I had to change some things. But that's not my point.

Because of all these many hotkeys I sometimes know I made a hotkey but what were the keys I have to press.

So I want to make a little help GUI or html or whatever. Now I'm interested to automate my own list of hotkeys.

How can I collect all my hotkeys and necessary keys for this in a list?


Regard, Conrad

Edited by Simpel
SciTE4AutoIt =   AutoIt =   AutoItX64 = 0   OS = Win7Pro SP1   OSArch = X64   Language = 0407/german
H:\...\AutoIt3\SciTE     H:\...\AutoIt3      H:\...\AutoIt3\Include     (H:\ = Network Drive)

   88x31.png  Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind.

Link to post
Share on other sites

Write them down as you enter them into the script.

If I posted any code, assume that code was written using the latest release version unless stated otherwise. Also, if it doesn't work on XP I can't help with that because I don't have access to XP, and I'm not going to.
Give a programmer the correct code and he can do his work for a day. Teach a programmer to debug and he can do his work for a lifetime - by Chirag Gude
How to ask questions the smart way!

I hereby grant any person the right to use any code I post, that I am the original author of, on the autoitscript.com forums, unless I've specifically stated otherwise in the code or the thread post. If you do use my code all I ask, as a courtesy, is to make note of where you got it from.

Back up and restore Windows user files _Array.au3 - Modified array functions that include support for 2D arrays.  -  ColorChooser - An add-on for SciTE that pops up a color dialog so you can select and paste a color code into a script.  -  Customizable Splashscreen GUI w/Progress Bar - Create a custom "splash screen" GUI with a progress bar and custom label.  -  _FileGetProperty - Retrieve the properties of a file  -  SciTE Toolbar - A toolbar demo for use with the SciTE editor  -  GUIRegisterMsg demo - Demo script to show how to use the Windows messages to interact with controls and your GUI.  -   Latin Square password generator

Link to post
Share on other sites
  • 3 weeks later...


now I do it this way:

Global $aH[0][2] ; Array für Hilfe
Global $bPortable = True

If @UserName = "ABCDE" Then $bPortable = False ; all office clients at work

#region - Hotkeys Global ; for all users
_ArrayAdd($aH, "STRG F1|Hotkey Hilfe")
HotKeySet("{PAUSE}", "TogglePause")   ; Pause-Taste
_ArrayAdd($aH, "PAUSE|Pause Anhalten Stop")
HotKeySet("^!d","OpenExplorer")  ;Strg-Alt-d
_ArrayAdd($aH, "STRG ALT D|Explorer Arbeitsplatz")
HotKeySet("^!t","OpenTaskManager")  ;Strg-Alt-t
_ArrayAdd($aH, "STRG ALT T|TaskManager")
HotKeySet("^!{SPACE}","Minimize")  ;Strg-Alt-Space
_ArrayAdd($aH, "STRG ALT SPACE|Minimieren Minimize Fenster verkleinern")
HotKeySet("+^!{SPACE}","Maximize")  ;Shift+Strg-Alt-Space
_ArrayAdd($aH, "SHIFT STRG ALT SPACE|Maximieren Maximize Fenster vergrößern")
HotKeySet("^!n","OpenNotepad")  ;Strg-Alt-n
_ArrayAdd($aH, "STRG ALT N|Notepad Editor Wordpad")
HotKeySet("^!r","OpenRechner")  ;Strg-Alt-r
_ArrayAdd($aH, "STRG ALT R|Rechner Taschenrechner")
HotKeySet("^!w","OpenWord")  ;Strg-Alt-w
_ArrayAdd($aH, "STRG ALT W|Word Office12")
HotKeySet("^!e","OpenExcel")  ;Strg-Alt-e
_ArrayAdd($aH, "STRG ALT E|Excel Office12")
HotKeySet("^!i","OpenLaufwerkI")  ;Strg-Alt-i
_ArrayAdd($aH, "STRG ALT I|USB Laufwerk anzeigen öffnen Explorer")
HotKeySet("+^!i","EjectUSB")    ;Shift-Strg-Alt-i
_ArrayAdd($aH, "SHIFT STRG ALT U|USB Laufwerk auswerfen unmounten")
_ArrayAdd($aH, "STRG ALT RECHTS|Fenster rechts verschieben")
_ArrayAdd($aH, "STRG ALT LINKS|Fenster links verschieben")
HotKeySet("{F5}", "RefreshDispo")   ; F5
_ArrayAdd($aH, "F5|Refresh Dispo Aktualisieren")
HotKeySet("^!m","MediaCenter")  ;Strg-Alt-m
_ArrayAdd($aH, "STRG ALT M|MediaCenter MC")
HotKeySet("^!c","OpenPfad")  ;Strg-Alt-c
_ArrayAdd($aH, "STRG ALT C|Clipboard Zwischenablage Pfad Explorer Kopieren")
_ArrayAdd($aH, "F10|Refresh Aktualisieren Ergebnisse")
_ArrayAdd($aH, "F11|Refresh Aktualisieren Prozesse")
_ArrayAdd($aH, "SHIFT F10|Reset Zurücksetzen Refresh Aktualisieren Ergebnisse")
_ArrayAdd($aH, "SHIFT F11|Reset Zurücksetzen Refresh Aktualisieren Prozesse")
HotKeySet("^!k","Sonderzeichen")  ;Strg-Alt-k
_ArrayAdd($aH, "STRG ALT K|Kill Sonderzeichen")
HotKeySet("^!{Up}","SortDate")  ;Strg-Alt-Pfeil hoch
_ArrayAdd($aH, "STRG ALT HOCH|Explorer Sortieren Datum")
HotKeySet("^!{Down}","SortName")  ;Strg-Alt-Pfeil runter
_ArrayAdd($aH, "STRG ALT RUNTER|Explorer Sortieren Name")
HotKeySet("^{BREAK}", "KillF5") ;Strg-BREAK beendet mit F5 gestarteten AutoIt-Prozess
_ArrayAdd($aH, "STRG BREAK|AutoIt Abbrechen SciTE")
HotKeySet("+^!e","Details")  ;Shift-Strg-Alt-e
_ArrayAdd($aH, "SHIFT STRG ALT E|Eigenschaften Details Explorer Ansicht")
HotKeySet("+^c", "Copy_no_Format") ;Shift-Strg-c entfernt alle Formatierungen im Clipboard
_ArrayAdd($aH, "SHIFT STRG C|Clipboard Zwischenablage Kopieren Formatierung Killen Löschen")

#region - Hotkeys only user ABCDE
If Not $bPortable Then
    HotKeySet("^!l","OpenLotus")  ;Strg-Alt-l
    _ArrayAdd($aH, "STRG ALT L|Lotus Lotus8")
    HotKeySet("^!a","OpenAutoIt")  ;Strg-Alt-a
    _ArrayAdd($aH, "STRG ALT A|AutoIt SciTE Includes")
    HotKeySet("^!f","OpenOrdner")  ;Strg-Alt-f
    _ArrayAdd($aH, "STRG ALT F|Favoriten Ordner Explorer Folder")
    HotKeySet("^!b","OpenBBCode")  ;Strg-Alt-b
    _ArrayAdd($aH, "STRG ALT B|BBCode Tabelle Excel")
    HotKeySet("{ESC}", "LotusESC")   ; ESC
    _ArrayAdd($aH, "ESC|Lotus")
    HotKeySet("^!p","OpenProgrammstart")  ;Strg-Alt-p
    _ArrayAdd($aH, "STRG ALT P|Programmstart")
    HotKeySet("{F6}", "Zoom")   ; F6
    _ArrayAdd($aH, "F6|Zoom BID Lupe Pastebin")
    HotKeySet("+^!s","Auftrag")  ;Shift-Strg-Alt-s
    _ArrayAdd($aH, "SHIFT STRG ALT S|Sofi Auftrag Dispo Blockzeit Rechtsklick")

#region - Hotkeys only Portable
If $bPortable Then
    TrayTip("Hotkey - Portable", "Der Benutzer ist " & @UserName & ".", 10, 16)
    HotKeySet("^!b","BID")  ;Strg-Alt-b
    _ArrayAdd($aH, "STRG ALT B|BID Fairlight Kopieren MediaCenter MC")
    HotKeySet("^!p","Pastebin")  ;Strg-Alt-p
    _ArrayAdd($aH, "STRG ALT P|Pastebin Abruf")

#region - Hotkeys old and skipped
;~ HotKeySet("^!y","OpenLaufwerkY")  ;Strg-Alt-y
;~ HotKeySet("^!z","OpenLaufwerkZ")  ;Strg-Alt-z
;~ HotKeySet("#{DEL}","Lock")
;~ HotKeySet("^!u","UngeleseneBeitraege")  ;Strg-Alt-u

While 1

Func Hilfe()
    Local $sAbfrage = InputBox("Hotkey - Hilfe", " " & @CRLF & @CRLF & "Bitte den Suchbegriff eingeben:") ; input search string
    Local $aErgebnisIndizies = _ArrayFindAll($aH, $sAbfrage, 0, 0, 0, 1, 1)
    Local $ii = UBound($aErgebnisIndizies)
    Local $aE[$ii][2]
    For $i = 0 To UBound($aErgebnisIndizies) - 1
        $aE[$i][0] = $aH[$aErgebnisIndizies[$i]][0]
        $aE[$i][1] = $aH[$aErgebnisIndizies[$i]][1]
    If $sAbfrage = "" Then
        _ArrayDisplay($aH, "Hotkey-Hilfe","", 0, Default, "Tasten|Tags")
        _ArrayDisplay($aE, "Hotkey-Hilfe","", 0, Default, "Tasten|Tags")

_ArrayAdd($aH, KEYS|TAGS to search)

Regards, Conrad

Edited by Simpel
SciTE4AutoIt =   AutoIt =   AutoItX64 = 0   OS = Win7Pro SP1   OSArch = X64   Language = 0407/german
H:\...\AutoIt3\SciTE     H:\...\AutoIt3      H:\...\AutoIt3\Include     (H:\ = Network Drive)

   88x31.png  Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind.

Link to post
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    No registered users viewing this page.

  • Similar Content

    • By Colduction
      Hi dear friends!, i'm sorry for creating a new thread (a new problem), i have over than 9 lists that i want to combine them to be this (in this example, there are 3 test files):

      I've written a little code for splitting main information, but i really confused how to make results as "Output.txt", here is that code:
      $sRegex_1 = StringRegExp(FileRead("1.txt"), '(?s:(?<=\=\=\r\n)(.*?)(?=\r\n\=\=))', 3) $sRegex_2 = StringRegExp(FileRead("2.txt"), '(?s:(?<=\=\=\r\n)(.*?)(?=\r\n\=\=))', 3) $sRegex_3 = StringRegExp(FileRead("3.txt"), '(?s:(?<=\=\=\r\n)(.*?)(?=\r\n\=\=))', 3) For $i = 0 To UBound($sRegex_1) - 1 ConsoleWrite($sRegex_1[$i] & @CRLF) For $j = 0 To UBound($sRegex_2) - 1 ConsoleWrite($sRegex_2[$j] & @CRLF) For $k = 0 To UBound($sRegex_3) - 1 ConsoleWrite($sRegex_3[$k] & @CRLF) Next Next Next  
    • By nacerbaaziz
      hello autoit team
      is there any wey to check if any process run as admin or no?
      i mean e.g if i want to restart any process, now i have the ability to get the process path and commands line
      what i need is a wey to check if the process was runing as admin or no to restart it with the same state.
      here is the part that am using it to restart the process
      func _processRestart($i_pid, $s_ProcessPath) if not (ProcessExists($i_ProcessPid)) then return SetError(1, 0, -1) local $s_ProcessWorkDir = _WinAPI_GetProcessWorkingDirectory($i_ProcessPid) ProcessClose($i_ProcessPid) ProcessWaitClose($i_ProcessPid) ProcessWait(ShellExecute($i_pid,"", $s_ProcessWorkDir)) ProcessesGetList() return true endFunc thanks in advance
    • By Colduction
      Hi guys!, i have a problem to convert Python code to AutoIt code, in fact i had not coded with Python yet!, this code is about permutation a string's case, i will be happy with your comments :)❤;

      Python code:
      # Python code to print all permutations # with respect to cases # Function to generate permutations def permute(inp): n = len(inp) # Number of permutations is 2^n mx = 1 << n # Converting string to lower case inp = inp.lower() # Using all subsequences and permuting them for i in range(mx): # If j-th bit is set, we convert it to upper case combination = [k for k in inp] for j in range(n): if (((i >> j) & 1) == 1): combination[j] = inp[j].upper() temp = "" # Printing current combination for i in combination: temp += i print(temp), # Driver code permute("Hello") # This code is contributed by Sachin Bisht
      My code in AutoIt:
      ; https://www.geeksforgeeks.org/permute-string-changing-case/ _PermuteCase("ABC") Func _PermuteCase($sText) If StringRegExp($sText, "^[A-Za-z]{1,}$") Then Local $iLength = StringLen($sText) ; Get length of the text. Local $iMaxPerm = 2 ^ $iLength ; Number of permutations is 2^n Local $sLow_Text = StringLower($sText) ; Converting string to lower case Local $asChrs = StringToASCIIArray($sLow_Text) ; Split the text into array of chars. For $i = 1 To $iMaxPerm Step 1 For $j = 0 To $asChrs[0] ;................................................... Next Next Else Return SetError(-1, 0, "Error: Input is incorrect!") EndIf EndFunc ;==>_PermuteCase  
      ====================== SOLUTION by @TheXman ======================
    • By TheAutomator
      I'm working on a script that needs to work with a huge database inside a combobox.
      I'm looking for the best way to link a multidimensional array to that data to load that data on to textfields.

      combo item 0 = "A", data = [index linked to combo item 0] [1,0,5,4,87,9,"xyz"]
      combo item 1 = "B", data = [index linked to combo item 1] [1,6,5,4,87,9,"zzz"]
      combo item 3 = "A", data = [index linked to combo item 3] [1,6,4,4,87,9,"aaa"] ; yes also double items!
      Would also like to be able to delete and add items on the fly btw..
      Local $INDEX[0][10] ; ubound wil be resized like a stack while loading from a textfile ;inside gui: local $Combo = GUICtrlCreateCombo('...', 10, 10, 290, 25) ;gui loop: While True Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit Case $Combo display() ; how do i link my array index to the combo labels to know what to show in the textfields? ; NOTE: (there are duplicate items in the combobox!) EndSwitch WEnd Any toughs are welcome.
      I was thinking about using _GUICtrlComboBox_GetCurSel($Combo) and use that integer to refer to the index (dimension 1) of the array 
      Thanks, TheAutomator
    • By nacerbaaziz
      good morning all.
      first lit me give you all a thinks to your help
      you're help me allot thank you all.
      sirs today i've a new problem
      it's not a problem but thing i want to add it to blind accessability.
      the ListBox can send a notification when the user send a double click on it items
      but as we know that the blind users can't use the mouse for that they use the keybord to navigate.
      as we know that the enter replace the double click on the keybord
      for that i need when the user send a inter above any listBox item the list send a double click notification.
      i know some of you tell me that i can use the  GUISetAccelerators function
      but the enter has a other tasks such as leav a blanc line on edits and activate the defaultButton and other tasks.
      that what i need and i hope that you can help me
      this is a simple example.
      #include <GUIConstantsEx.au3> #include <StructureConstants.au3> #include <MsgBoxConstants.au3> #include <WindowsConstants.au3> #include <ListBoxConstants.au3> Example() Func Example() Local $sMESSAGE = "The following buttons have been clicked" GUICreate("My GUI list") ; will create a dialog box that when displayed is centered Local $idButton_Add = GUICtrlCreateButton("Add", 64, 32, 75, 25) Local $idButton_Clear = GUICtrlCreateButton("Clear", 64, 72, 75, 25) global $idMylist = GUICtrlCreateList("buttons that have been clicked", 176, 32, 121, 97) GUICtrlSetLimit(-1, 200) ; to limit horizontal scrolling GUICtrlSetData(-1, $sMESSAGE) global $DummyList = GUICtrlCreateDummy() GUICtrlSendToDummy($DummyList, 1) Local $idButton_Close = GUICtrlCreateButton("my closing button", 64, 160, 175, 25) GUIRegisterMsg($WM_command, "WM_command") GUISetState(@SW_SHOW) ; Loop until the user exits. While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE ExitLoop Case $idButton_Add GUICtrlSetData($idMylist, "You clicked button No1|") Case $idButton_Clear GUICtrlSetData($idMylist, "") Case $idButton_Close MsgBox($MB_SYSTEMMODAL, "", "the closing button has been clicked", 2) Exit case $DummyList $g_iTemp = GUICtrlRead($DummyList) if $g_iTemp = $LBN_DBLCLK then ;$LBN_DBLCLK then msgBox(64, "", "") endIf GUICtrlSendToDummy($DummyList, 0) EndSwitch WEnd EndFunc ;==>Example Func WM_command($hWnd, $iMsg, $wParam, $lParam) #forceref $hWnd, $iMsg Local $tNMHDR = DllStructCreate($tagNMHDR, $lParam) $hWndFrom = $lParam $iCode = BitShift($wParam, 16) ; Hi Word Switch $hWndFrom Case GUICtrlGetHandle($idMylist) Switch $iCode Case $LBN_SELCHANGE, $LBN_DBLCLK, $LBN_SELCANCEL, $LBN_SETFOCUS GUICtrlSendToDummy($DummyList, $iCode) case else ;GUICtrlSendToDummy($DummyTreeview, 1) EndSwitch EndSwitch Return $GUI_RUNDEFMSG EndFunc  
  • Create New...