Differences

This shows you the differences between two versions of the page.

--- programmieren:autohotkey [2019/03/04 13:36] – [Fenster positionieren und in Größe ändern (Windows 10)] felix
+++ programmieren:autohotkey [2025/10/30 17:21] (current) – [Mausrad kippen um Übersicht der Fenster aufzurufen / zum letzten Fenster wechseln] felix
@@ Line 9: / Line 9: @@
 ===== Nützliche Skripte =====
 ==== Windows 10: Virtuelle Desktops wechseln ====
-<file autohotkey win10cycledesktops.ahk>
+<code autohotkey>
 ; angenehmere Shortcuts um in Windows 10 die Desktops zu verwalten
 ; Strg+Win+A (links)
@@ Line 22: / Line 22: @@
 ^#w::^#F4
 Return
-</file>
+</code>
-==== Mit freundlichen Grüßen ====
-<code autohotkey>
-; in einem beliebigen Programm "mfg" eintippen und schon erscheint es ausgeschrieben
-::mfg::Mit freundlichen Grüßen
-Return
-</code>
 ==== F1 drücken bewirkt F2 ====
 <code autohotkey>
-; beim druecken von F1 wird tatsaechlich F2 ausgefuehrt
+; beim Druecken von F1 wird tatsaechlich F2 ausgefuehrt
 F1::F2
 Return
 </code>
 ==== Tastenkombination startet Programm ====
 <code autohotkey>
 ; das Such-Programm "Everything" mit Windows+S starten
-#s::
+#s:: {
-Run, %ProgramFiles%\Everything\Everything.exe
+	Run("%ProgramFiles%\Everything\Everything.exe")
-Return
+}
 </code>
 Everything wurde in der Standardinstallation als Service installiert (Optionen im Installationsdialog wie vorgegeben auswählt lassen).
+==== Mausrad kippen um Übersicht der Fenster aufzurufen / zum letzten Fenster wechseln ====
 <code autohotkey>
-#c::
+; Mausrad links/rechts kippen auf "Alt+Tab" und "Win+Tab" setzen
-Run, C:\Apps\cmder\Cmder.exe
+WheelLeft::
+	Send !{Tab}
+Return
+WheelRight::
+	Send #{Tab}
 Return
 </code>
-==== Fenster positionieren und in Größe ändern (Windows 7) ====
-<code autohotkey>
-; ^ = Strg-Taste
-; ! = Alt-Taste
-; # = Windows-Taste
-; a = a-Taste
-; Hoehe der Favouriten-Bar: 30px (hier noch nicht abgezogen)
-widthOffset := 22
-heightOffset := 107
-Width := (1275 + widthOffset)
-Height := (851 + heightOffset)
-; Position auf Bildschirm (0/0: obere linke Ecke)
-X := 0
-Y := 0
-; vor den zwei Doppelpunkten wird die Tastenkombination definiert
-^!a::WinMove,A,,%X%,%Y%,%Width%,%Height%
-Return</code>
-==== Fenster positionieren und in Größe ändern (Windows 10) ====
+AHK v2-kompatibler Code:
 <code autohotkey>
-#NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
+; Mausrad links/rechts kippen auf "Alt+Tab" und "Win+Tab" setzen
-; #Warn  ; Enable warnings to assist with detecting common errors.
-SendMode Input  ; Recommended for new scripts due to its superior speed and reliability.
-SetWorkingDir %A_ScriptDir%  ; Ensures a consistent starting directory.
+isWheelLeftOnCooldown := false
-windowx:=10
+WheelLeft::
-windowy:=0
+{
-windowh:=500
+    global isWheelLeftOnCooldown
-windoww:=700
+    if isWheelLeftOnCooldown
+        return
+    isWheelLeftOnCooldown := true
+    Send('!{Tab}') ; Alt + Tab
+	;SoundBeep(2000, 100)        ; Debug-Sound: 1000 Hz für 100 ms
-^r::
+    SetTimer(() => isWheelLeftOnCooldown := false, -500) ; 500 ms Sperre
-	WinGetActiveTitle, Title
+}
-	WinActivate, %Title%
-	WinRestore, %Title%
-	;WinMove, %Title%, , windowx, windowy ,windoww , windowh
-	Sleep, 200
-	; Zielgroesse: 1280x780
-	WinMove, %Title%, , , , 1294, 787
-return</code>
-==== Mausrad kippen um ganz runter zu scrollen ====
-<code autohotkey>
-; Mausrad links/rechts kippen auf "Pos1" und "Ende" setzen
-WheelLeft::End
-Return
-WheelRight::Home
-Return
-</code>
+lastWheelRightTime := 0
+WheelRight::
+{
+    global lastWheelRightTime
+    currentTime := A_TickCount
+    if (currentTime - lastWheelRightTime < 500)
+        return
+    lastWheelRightTime := currentTime
+    Send('#{Tab}')  ; Win + Tab
+}
+</code>