Last active
June 23, 2024 03:35
-
-
Save Elijas/49b83ade78674d80cf6cbf711455f75c to your computer and use it in GitHub Desktop.
Easy Window Drag (KDE) - Allows to drag/resize windows by clicking and dragging mouse buttons while holding a modifier key. No more sniping the windows corners - just hovering the window becomes enough.
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
; Easy Window Dragging -- KDE style (requires XP/2k/NT) -- by Jonny | |
; http://www.autohotkey.com | |
; This script makes it much easier to move or resize a window: 1) Hold down | |
; the ALT key and LEFT-click anywhere inside a window to drag it to a new | |
; location; 2) Hold down ALT and RIGHT-click-drag anywhere inside a window | |
; to easily resize it; 3) Press ALT twice, but before releasing it the second | |
; time, left-click to minimize the window under the mouse cursor, right-click | |
; to maximize it, or middle-click to close it. | |
; This script was inspired by and built on many like it | |
; in the forum. Thanks go out to ck, thinkstorm, Chris, | |
; and aurelian for a job well done. | |
; Change history: | |
; November 07, 2006: Optimized resizing code in !RButton, courtesy of bluedawn. | |
; February 05, 2006: Fixed double-alt (the ~Alt hotkey) to work with latest versions of AHK. | |
; The Double-Alt modifier is activated by pressing | |
; Alt twice, much like a double-click. Hold the second | |
; press down until you click. | |
; | |
; The shortcuts: | |
; Alt + Left Button : Drag to move a window. | |
; Alt + Right Button : Drag to resize a window. | |
; Double-Alt + Left Button : Minimize a window. | |
; Double-Alt + Right Button : Maximize/Restore a window. | |
; Double-Alt + Middle Button : Close a window. | |
; | |
; You can optionally release Alt after the first | |
; click rather than holding it down the whole time. | |
If (A_AhkVersion < "1.0.39.00") | |
{ | |
MsgBox,20,,This script may not work properly with your version of AutoHotkey. Continue? | |
IfMsgBox,No | |
ExitApp | |
} | |
; This is the setting that runs smoothest on my | |
; system. Depending on your video card and cpu | |
; power, you may want to raise or lower this value. | |
SetWinDelay,2 | |
CoordMode,Mouse | |
return | |
!LButton:: | |
If DoubleAlt | |
{ | |
MouseGetPos,,,KDE_id | |
; This message is mostly equivalent to WinMinimize, | |
; but it avoids a bug with PSPad. | |
PostMessage,0x112,0xf020,,,ahk_id %KDE_id% | |
DoubleAlt := false | |
return | |
} | |
; Get the initial mouse position and window id, and | |
; abort if the window is maximized. | |
MouseGetPos,KDE_X1,KDE_Y1,KDE_id | |
WinGet,KDE_Win,MinMax,ahk_id %KDE_id% | |
If KDE_Win | |
return | |
; Get the initial window position. | |
WinGetPos,KDE_WinX1,KDE_WinY1,,,ahk_id %KDE_id% | |
Loop | |
{ | |
GetKeyState,KDE_Button,LButton,P ; Break if button has been released. | |
If KDE_Button = U | |
break | |
MouseGetPos,KDE_X2,KDE_Y2 ; Get the current mouse position. | |
KDE_X2 -= KDE_X1 ; Obtain an offset from the initial mouse position. | |
KDE_Y2 -= KDE_Y1 | |
KDE_WinX2 := (KDE_WinX1 + KDE_X2) ; Apply this offset to the window position. | |
KDE_WinY2 := (KDE_WinY1 + KDE_Y2) | |
WinMove,ahk_id %KDE_id%,,%KDE_WinX2%,%KDE_WinY2% ; Move the window to the new position. | |
} | |
return | |
!RButton:: | |
If DoubleAlt | |
{ | |
MouseGetPos,,,KDE_id | |
; Toggle between maximized and restored state. | |
WinGet,KDE_Win,MinMax,ahk_id %KDE_id% | |
If KDE_Win | |
WinRestore,ahk_id %KDE_id% | |
Else | |
WinMaximize,ahk_id %KDE_id% | |
DoubleAlt := false | |
return | |
} | |
; Get the initial mouse position and window id, and | |
; abort if the window is maximized. | |
MouseGetPos,KDE_X1,KDE_Y1,KDE_id | |
WinGet,KDE_Win,MinMax,ahk_id %KDE_id% | |
If KDE_Win | |
return | |
; Get the initial window position and size. | |
WinGetPos,KDE_WinX1,KDE_WinY1,KDE_WinW,KDE_WinH,ahk_id %KDE_id% | |
; Define the window region the mouse is currently in. | |
; The four regions are Up and Left, Up and Right, Down and Left, Down and Right. | |
If (KDE_X1 < KDE_WinX1 + KDE_WinW / 2) | |
KDE_WinLeft := 1 | |
Else | |
KDE_WinLeft := -1 | |
If (KDE_Y1 < KDE_WinY1 + KDE_WinH / 2) | |
KDE_WinUp := 1 | |
Else | |
KDE_WinUp := -1 | |
Loop | |
{ | |
GetKeyState,KDE_Button,RButton,P ; Break if button has been released. | |
If KDE_Button = U | |
break | |
MouseGetPos,KDE_X2,KDE_Y2 ; Get the current mouse position. | |
; Get the current window position and size. | |
WinGetPos,KDE_WinX1,KDE_WinY1,KDE_WinW,KDE_WinH,ahk_id %KDE_id% | |
KDE_X2 -= KDE_X1 ; Obtain an offset from the initial mouse position. | |
KDE_Y2 -= KDE_Y1 | |
; Then, act according to the defined region. | |
WinMove,ahk_id %KDE_id%,, KDE_WinX1 + (KDE_WinLeft+1)/2*KDE_X2 ; X of resized window | |
, KDE_WinY1 + (KDE_WinUp+1)/2*KDE_Y2 ; Y of resized window | |
, KDE_WinW - KDE_WinLeft *KDE_X2 ; W of resized window | |
, KDE_WinH - KDE_WinUp *KDE_Y2 ; H of resized window | |
KDE_X1 := (KDE_X2 + KDE_X1) ; Reset the initial position for the next iteration. | |
KDE_Y1 := (KDE_Y2 + KDE_Y1) | |
} | |
return | |
; "Alt + MButton" may be simpler, but I | |
; like an extra measure of security for | |
; an operation like this. | |
!MButton:: | |
If DoubleAlt | |
{ | |
MouseGetPos,,,KDE_id | |
WinClose,ahk_id %KDE_id% | |
DoubleAlt := false | |
return | |
} | |
return | |
; This detects "double-clicks" of the alt key. | |
~Alt:: | |
DoubleAlt := A_PriorHotKey = "~Alt" AND A_TimeSincePriorHotkey < 400 | |
Sleep 0 | |
KeyWait Alt ; This prevents the keyboard's auto-repeat feature from interfering. | |
return |
By the way, completely unrelated question, are you Lithuanian?? I lived in Vilnius for a year and Kaunas for about 2 months.
Yeah, I am!
I hope you had a pleasant stay
I would love to hear more about your trip, how about we connect on Linkedin or Discord (@ elijas_ai)?
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment
By the way, completely unrelated question, are you Lithuanian?? I lived in Vilnius for a year and Kaunas for about 2 months.