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

[kcvinu]

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]

#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]

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]

 

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]

Hi 

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

[jguinch]

Did you copy the whole code ? (with includes)

I do not have this error

[kcvinu]

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]

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]

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]

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]

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]

 

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]

Hi 

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

[jguinch]

@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]

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

[thuanphat2015]

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