How to get the list of windows opened in task bar.

[kcvinu 71]

Hi all,

I need to get the list of windows which are resting in taskar. That means, windows which i can toggle through ALT TAB. I use "WinList" function. But it gives me all the windows. Then i tried to filter it like this;

Local $lst = WinList()
Local $Row = 0
For $i = 1 To $lst[0][0]

    If $lst[$i][0] = "" And Not BitAND(WinGetState($lst[$i][1]), 1) Then
        _ArrayDelete($lst,$Row)
    EndIf
    $Row +=1
Next
_ArrayDisplay($lst)

But this code doesn't delete the 2nd column. I have read the help file and saw an example which deletes an entire row from a 2 dimensional array. I have used the same method but please look this image. This is what i have got.

[Kyan 12]

#include <Array.au3>
[code=autoit:0]Local $lst = WinList()
Local $i=1
Do
    If $lst[$i][0] = "" And Not BitAND(WinGetState($lst[$i][1]), 1) Then _ArrayDelete($lst,$i)
    $i+=1
Until $i>UBound($lst)-1
_ArrayDisplay($lst)
Exit

Maybe you can only use _arraydelete for 1D arrays

EDIT:Nope, is all fine, _arraydelete supports up to 2D arrays

EDIT2: Solved:

 

Local $lst = WinList('[REGEXPTITLE:(.+)]')
_ArrayDisplay($lst)
Exit

Edited March 2, 2015 by Kyan

[jguinch 459]

A beginning, but not perfect:

#Include <WinAPI.au3>
#Include <WindowsConstants.au3>

$aList = WinList()

For $i = 1 To $aList[0][0]
    $iExStyle = _WinAPI_GetWindowLong($aList[$i][1], $GWL_EXSTYLE) ; get the extended style of each Window
    
    If NOT BitAND($iExStyle, $WS_EX_TOOLWINDOW) AND _  ; Search for windows without $WS_EX_TOOLWINDOW extended style
       BitAND(WinGetState($aList[$i][1]), 2 ) Then     ; And only visible windows 
        ConsoleWrite($aList[$i][0] & @CRLF)
    EndIf
Next

[kcvinu 71]

 

EDIT2: Solved:

 

Local $lst = WinList('[REGEXPTITLE:(.+)]')
_ArrayDisplay($lst)
Exit

 

Hi 

Kyan, Solved.. Thanks a lot. And, How can i learn more about this "[REGEXPTITLE:(.+)]" Any tutorials ?

[kcvinu 71]

Hi 

jguinch, Thanks for your reply. But your code gives an error. Please look this image.

[jguinch 459]

Did you copy the whole code ? (with includes)

I do not have this error

[kcvinu 71]

Hi 

jguinch, Yes.. it worked. And after the final comparison, i have decided to declare your answer is the best. Because, it gives the taskbar windows only, This is what i want. Thank you, Thanks a lot. And, after a few hours, i will get time to study your code. Then can i ask you about  these two constants ? $iExStyle, $WS_EX_TOOLWINDOW

[kcvinu 71]

Hi 

jguinch, In your code, your are using console write. But i need to put this data into an array. But before the for loop, we can't say there are how many items in our array. So we can't declare an array. Then, how can i put this data into an array ? any idea ?

[jguinch 459]

You can just declare an array at the begining and redim it each time a Window is found.

Look, I do it for you now, try to understand the Redim role :

#Include <Array.au3>
#Include <WinAPI.au3>
#Include <WindowsConstants.au3>

Local $aWinInTaskBar[1][2]
$iCount = 0


$aList = WinList()

For $i = 1 To $aList[0][0]
    $iExStyle = _WinAPI_GetWindowLong($aList[$i][1], $GWL_EXSTYLE) ; get the extended style of each Window

    If NOT BitAND($iExStyle, $WS_EX_TOOLWINDOW) AND _  ; Search for windows without $WS_EX_TOOLWINDOW extended style
       BitAND(WinGetState($aList[$i][1]), 2 ) Then     ; And only visible windows
        $iCount += 1
        Redim $aWinInTaskBar[ $iCount + 1][2]
        $aWinInTaskBar[ $iCount][0] = $aList[$i][0]
        $aWinInTaskBar[ $iCount][1] = $aList[$i][1]
    EndIf
Next
$aWinInTaskBar[0][0] = UBound($aWinInTaskBar) - 1

_ArrayDisplay($aWinInTaskBar)

[kcvinu 71]

Hi 

jguinch, Thank you. I have wrote for loop twice to solve this. 

Local $Count = 0

For $i = 1 to Winlist[0][0]

   if find a task bar window then

      $Count += 1

  End If

Next.

Local $NewArray[$Count] 

Then second for loop will come and populate this $NewArray. 

[Melba23 3,729]

jguinch,

That is the worst possible way to deal with an array whose final size is unknown - ReDim is incredibly slow when the array gets large (although I admit it is unlikely to get too large in this particular case). Please see the final section of the Recursion tutorial in the Wiki to see the most efficient way to do it.

M23

[Kyan 12]

 

Hi 

Kyan, Solved.. Thanks a lot. And, How can i learn more about this "[REGEXPTITLE:(.+)]" Any tutorials ?

 

thats just a simple regular expression (the part in front of REGEXPTITLE:)

You can check the help file of Regular Expressions here:

stringRegExp()

[kcvinu 71]

Hi 

Kyan, I searched in help file for "REGEXP" and didn't get any result. Anyway, thank you.

[jguinch 459]

@M23 : You're right. I know that, I usually minimize the Redim usage (Redim $array[ubound($array) * 2].

But in this case, unless the user has hundreds of opened windows in the same time, is it necessary ?

For that matter, it could be interesting to add a comment in the Redim help page ?

[Kyan 12]

@kcvinu you can click in the function name that I posted (I searched in the help file index for "stringRegExp" and was found)

[thuanphat2015 0]

I have same problem, I try to do but it not run correct