Jumper - Programme, Webseiten, Dokumente mittels kurzem Schlüsselwort öffnen

  • Hallo zusammen,

    ich habe ein kleines, für mich aber hilfreiches Tool entwickelt. Das Tool heißt "Jumper" und ermöglicht es für Programme, Webseiten oder Dokumente "Jumps" (Schlüsselwörter) zu definieren und diese direkt aufzurufen. So lässt sich häufig Geöffnetes noch schneller öffnen.

    Beschreibung der Bedienung:

    • Verknüpfung in den Autostart legen (dann startet es unsichtbar)
    • Um ein Programm zu starten:

      • Shortcut aufrufen (Default: Alt + j)
      • Jump (Schlüsselwort) eingeben (z. B. ai + Enter)
      • Es öffnet sich die Autoitseite


    Die einzelnen Jumps werden in einer INI definiert, die mit dem Spezialjump "ini" geöffnet werden kann. Hier eine Beispiel-INI:

    Spoiler anzeigen

    Und hier das eigentliche Script:

    Spoiler anzeigen
    [autoit]

    #AutoIt3Wrapper_Icon=jumper.ico
    #AutoIt3Wrapper_UseUpx=y
    #NoTrayIcon
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #include <EditConstants.au3>
    #include <Misc.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Global Const $ini = @ScriptDir & "\jumper.ini"
    Global Const $ini_section_jumps = "JUMPS"
    Local Const $ini_section_preferences = "PREFERENCES"
    Local Const $ini_preferences_shortcut_key = "shortcut"
    Local Const $ini_preferences_exitjump_key = "exitjump"
    Local Const $ini_preferences_inijump_key = "inijump"
    Global Const $exitjump = IniRead($ini, $ini_section_jumps, $ini_preferences_exitjump_key, "EXIT")
    Global Const $inijump = IniRead($ini, $ini_section_jumps, $ini_preferences_inijump_key, "INI")

    [/autoit] [autoit][/autoit] [autoit]

    HotKeySet(IniRead($ini, $ini_section_preferences, $ini_preferences_shortcut_key, "!g"), "make_visible")

    [/autoit] [autoit][/autoit] [autoit]

    Local Const $gui_h = 24
    Local Const $gui_w = 200
    Local Const $gui_gap = 16
    GUICreate("Jumper", $gui_w, $gui_h+$gui_gap, -1, -1, BitOR($WS_POPUPWINDOW, $WS_POPUP))
    GUISetBkColor(0xffffff)
    Global $gui_input = GUICtrlCreateInput("", 0, $gui_gap/2, $gui_w, $gui_h, $ES_CENTER, $WS_EX_TRANSPARENT)
    GUICtrlSetBkColor(-1, 0xffffff)
    GUICtrlSetFont(-1, 16)

    [/autoit] [autoit][/autoit] [autoit]

    MsgBox(64, "Hinweis", "Das Tool ist im Hintergrund gestartet.", 2)
    While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
    Case $GUI_EVENT_CLOSE
    make_invisible()
    Case $gui_input
    jump()
    EndSwitch
    WEnd

    [/autoit] [autoit][/autoit] [autoit]

    Func make_visible()
    GUICtrlSetData($gui_input, "")
    GUISetState(@SW_SHOW)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func make_invisible()
    GUISetState(@SW_HIDE)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func jump()
    If GUICtrlRead($gui_input) = $exitjump Then
    Exit
    ElseIf GUICtrlRead($gui_input) = $inijump Then
    ShellExecute($ini)
    make_invisible()
    ElseIf _IsPressed("1B") Then ;ESC nach Eingabe
    make_invisible()
    Else
    Local $run = IniRead($ini, $ini_section_jumps, GUICtrlRead($gui_input), "")
    If $run <> "" Then
    ShellExecute($run)
    make_invisible()
    Else
    MsgBox(48, "Hinweis", "Kein Jump gefunden!")
    EndIf
    EndIf
    EndFunc

    [/autoit]

    Im ZIP-Anhang befinden sich die au3- u. ini-Datei und ein schickes Icon.