XREA.COM Logo XREA.COM Ad

スクリプト質問スレッド

125unnamed.ahk:05/09/13 02:21 ID:???
>>123
F12::SimpleTaskChange()

SimpleTaskChange()
{
    WinGet, activePId, PId, A
    WinGet, List, List
    Loop, %List%
    {
        hwnd := List%A_Index%
        WinGet, pId, PID, ahk_id %hwnd%
        if(pId == activePId)
            continue
        WinGetClass, className, ahk_id %hwnd%
        ; 除外クラス名の追加は、下行のコメントを外してクラス名を参照すると楽
        ; tooltip, [%className%]
        If className contains Shell_TrayWnd,CTipWnd,Indicator,Progman,tooltip
            continue
        Else
        {
            WinActivate, ahk_id %hwnd%
            break
        }
    }
}
85KB
名前: E-mail:
ファイル:
0ch BBS 2005-10-08