Local $var = WinList()

For $i = 1 To $var[0][0]
  ; 只显示带有标题的可见窗口
    If $var[$i][0] <> "" And IsVisible($var[$i][1]) Then
        MsgBox(0, "详细信息", "标题=" & $var[$i][0] & @LF & "句柄=" & $var[$i][1])
    EndIf
Next

Func IsVisible($handle)
    If BitAND(WinGetState($handle), 2) Then
        Return 1
    Else
        Return 0
    EndIf

EndFunc   ;==>IsVisible

AU3获取可见窗口，任务栏窗口列表

本文固定链接: http://jianyiit.com/post-241.html