我的Windows使用技巧

#Requires AutoHotkey v2.0
#SingleInstance Force

dll := A_ScriptDir "\VirtualDesktopAccessor.dll"
if !FileExist(dll) {
    MsgBox "缺少 VirtualDesktopAccessor.dll`n请把 DLL 放到脚本同目录：`n" dll
    ExitApp
}

; -------- 热键 --------
!1::Go(1)
!2::Go(2)
!3::Go(3)
!4::Go(4)
!5::Go(5)

!+1::MoveAndGo(1)
!+2::MoveAndGo(2)
!+3::MoveAndGo(3)
!+4::MoveAndGo(4)
!+5::MoveAndGo(5)
; ----------------------

Go(n) {
    global dll
    try {
        ; 参数：int desktopNumber（0-based）
        ; 返回：int
        DllCall(dll "\GoToDesktopNumber", "Int", n-1, "Int")
    } catch as e {
        MsgBox "GoToDesktopNumber 调用失败：`n" e.Message "`n`n常见原因：DLL 位数不匹配（x86/x64）或 DLL 不是这个版本"
    }
}

MoveAndGo(n) {
    global dll
    hwnd := WinGetID("A")
    if !hwnd
        return

    try {
        ; 参数：HWND + int desktopNumber（0-based）
        ; 返回：int
        DllCall(dll "\MoveWindowToDesktopNumber", "Ptr", hwnd, "Int", n-1, "Int")
        DllCall(dll "\GoToDesktopNumber", "Int", n-1, "Int")
    } catch as e {
        MsgBox "MoveWindowToDesktopNumber/GoToDesktopNumber 调用失败：`n" e.Message "`n`n若你在移动“管理员权限窗口”，脚本也需要管理员运行"
    }
}