home *** CD-ROM | disk | FTP | other *** search
/ PC World 2005 April / PCWorld_2005-04_cd.bin / software / vyzkuste / autoit / autoit-v3-setup.exe / Examples / WinList.au3 < prev    next >
Text File  |  2004-11-28  |  379b  |  18 lines
  1. $var = WinList()
  2.  
  3. For $i = 1 to $var[0][0]
  4.   ; Only display visble windows that have a title
  5.   If $var[$i][0] <> "" AND IsVisible($var[$i][1]) Then
  6.     MsgBox(0, "Details", "Title=" & $var[$i][0] & @LF & "Handle=" & $var[$i][1])
  7.   EndIf
  8. Next
  9.  
  10. Func IsVisible($handle)
  11.   If BitAnd( WinGetState($handle), 2 ) Then 
  12.     Return 1
  13.   Else
  14.     Return 0
  15.   EndIf
  16.  
  17. EndFunc
  18.