I need help about winlist

[bordomavi]

Local $var = WinList()

For $i = 1 To $var[0][0]
    ; Only display visble windows that have a title
    If $var[$i][0] <> "" And IsVisible($var[$i][1]) Then
        MsgBox(0, "Details", "Title=" & $var[$i][0] & @LF & "Handle=" & $var[$i][1])
    EndIf
Next

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

EndFunc   ;==>IsVisible

I dont understand it. i want create list for example "window1", "window2", "window3"

and when winexist window one of list than processclose("blabla.exe")

[kylomas]

bordomavi,

After you find the "window" that you want to close you need to find the process id using "wingetprocess".  You can then manipulate the process by process id.

The following code shows how to associate the window handle with a process id.

expandcollapse popup

#include <array.au3>

;---------------------------------------------
;  define arrays
;---------------------------------------------

local $list[300][4]                                                 ; 300 windows max
local enum $title, $handle, $pid, $exe                              ; enumerations for array offsets

;---------------------------------------------
;  get array of windows and populate $list
;---------------------------------------------

local $a1 = winlist()                                               ; get list of windows

for $i = 0 to $a1[0][0]                                             ; and copy title, handle and pid to $list array
    $list[$i][$title]   = $a1[$i][$title]                           ; window title
    $list[$i][$handle]  = $a1[$i][$handle]                          ; window handle
    $list[$i][$pid]     = wingetprocess($a1[$i][$handle])           ; owning process id
next

;---------------------------------------------
;  get array of processes and populate $list
;---------------------------------------------

local $a2 = processlist()                                           ; get list of processes

for $i = 0 to $a1[0][0]
    for $j = 0 to $a2[0][0]
        if $list[$i][2] = $a2[$j][1] then $list[$i][3] = $a2[$j][0] ; and copy process name to $list array
    Next
next

_arraysort($list,1,0,0,2)                                           ; sort the array by pid

_arraydisplay($list)

;---------------------------------------------
;  format output to console
;---------------------------------------------

local $savepid = '', $out = ''

for $i = 0 to ubound($list) - 1
    if $i = 0 then
        $out &= stringformat('%-10s%-15s',$list[$i][$pid],$list[$i][$exe]) & @crlf
        $savepid = $list[$i][$pid]
    endif
    if $list[$i][$pid] = '' then exitloop
    if  $savepid = $list[$i][$pid] then
        if $list[$i][$title] <> '' then $out &= @tab & @tab & $list[$i][$title] & @crlf
    else
        if $i <> 0 then $out &= stringformat('%-10s%-15s',$list[$i][$pid],$list[$i][$exe]) & @crlf
        $savepid = $list[$i][$pid]
    endif
next

consolewrite($out & @lf)

kylomas

[careca]

Did something that does that, maybe you can check the code and see how it works.

'?do=embed' frameborder='0' data-embedContent>>

[bordomavi]

bordomavi,

After you find the "window" that you want to close you need to find the process id using "wingetprocess".  You can then manipulate the process by process id.

The following code shows how to associate the window handle with a process id.

expandcollapse popup

#include <array.au3>

;---------------------------------------------
;  define arrays
;---------------------------------------------

local $list[300][4]                                                 ; 300 windows max
local enum $title, $handle, $pid, $exe                              ; enumerations for array offsets

;---------------------------------------------
;  get array of windows and populate $list
;---------------------------------------------

local $a1 = winlist()                                               ; get list of windows

for $i = 0 to $a1[0][0]                                             ; and copy title, handle and pid to $list array
    $list[$i][$title]   = $a1[$i][$title]                           ; window title
    $list[$i][$handle]  = $a1[$i][$handle]                          ; window handle
    $list[$i][$pid]     = wingetprocess($a1[$i][$handle])           ; owning process id
next

;---------------------------------------------
;  get array of processes and populate $list
;---------------------------------------------

local $a2 = processlist()                                           ; get list of processes

for $i = 0 to $a1[0][0]
    for $j = 0 to $a2[0][0]
        if $list[$i][2] = $a2[$j][1] then $list[$i][3] = $a2[$j][0] ; and copy process name to $list array
    Next
next

_arraysort($list,1,0,0,2)                                           ; sort the array by pid

_arraydisplay($list)

;---------------------------------------------
;  format output to console
;---------------------------------------------

local $savepid = '', $out = ''

for $i = 0 to ubound($list) - 1
    if $i = 0 then
        $out &= stringformat('%-10s%-15s',$list[$i][$pid],$list[$i][$exe]) & @crlf
        $savepid = $list[$i][$pid]
    endif
    if $list[$i][$pid] = '' then exitloop
    if  $savepid = $list[$i][$pid] then
        if $list[$i][$title] <> '' then $out &= @tab & @tab & $list[$i][$title] & @crlf
    else
        if $i <> 0 then $out &= stringformat('%-10s%-15s',$list[$i][$pid],$list[$i][$exe]) & @crlf
        $savepid = $list[$i][$pid]
    endif
next

consolewrite($out & @lf)

kylomas

where i write window title and processname?

[kylomas]

bordomavi,

The code I posted is just a visual representation of how the process id related to the window(s).

After you find the "window" that you want to close you need to find the process id using "wingetprocess". You can then manipulate the process by process id.

 

So, using the code you posted it might look like this (untested)

Local $var = WinList(), $pid

For $i = 1 To $var[0][0]
    ; Only display visble windows that have a title
    If $var[$i][0] = "the title that I am looking for" And IsVisible($var[$i][1]) Then
            $pid = wingetprocess($var[$i][1])
            ;
            ; do something with it
            ;
    EndIf
Next

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

EndFunc   ;==>IsVisible

kylomas

[bordomavi]

bordomavi,

The code I posted is just a visual representation of how the process id related to the window(s).

 

So, using the code you posted it might look like this (untested)

Local $var = WinList(), $pid

For $i = 1 To $var[0][0]
    ; Only display visble windows that have a title
    If $var[$i][0] = "the title that I am looking for" And IsVisible($var[$i][1]) Then
            $pid = wingetprocess($var[$i][1])
            ;
            ; do something with it
            ;
    EndIf
Next

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

EndFunc   ;==>IsVisible

kylomas

i dont want it. i want this:

for example:

"window1"   ;

"window2"   ;

"window3"   ; these are list

"window4"   ;

if winexist "any window from list" than

processclose("a.exe")

processclose("b.exe")

end if

[Gianni]

hi bordomavi

excuse me,
but which windows should go in your list?

[bordomavi]

hi bordomavi

excuse me,

but which windows should go in your list?

any windows. i write manuel.

[Gianni]

to identify a windows of your choice between many, you must decide how to chose it, one way is select a windows with a specific title in the middle of others, so your "list" should be a list of windows titles (the ones you want to check the existence).
if I haven't understand wrong, then this code should do

local $MyList[4] = ["window1","window2","window3","window4"] ; the list of yours window titles

for $i = 1 to UBound($MyList) -1
 ; check the existence of one window with one of your titles    
    if WinExists($MyList[$i]) Then ; if it finds
        ; do what you want
        ExitLoop ; do not search no more
    EndIf
next

no need of WinList

[bordomavi]

to identify a windows of your choice between many, you must decide how to chose it, one way is select a windows with a specific title in the middle of others, so your "list" should be a list of windows titles (the ones you want to check the existence).

if I haven't understand wrong, then this code should do

local $MyList[4] = ["window1","window2","window3","window4"] ; the list of yours window titles

for $i = 1 to UBound($MyList) -1
 ; check the existence of one window with one of your titles    
    if WinExists($MyList[$i]) Then ; if it finds
        ; do what you want
        ExitLoop ; do not search no more
    EndIf
next

no need of WinList

it choose 1 window or existing window ?

[Gianni]

it looks for the existence of at least one of the windows of your list

[bordomavi]

it looks for the existence of at least one of the windows of your list

ok ty very much

[Gianni]

You're Welcome

[bordomavi]

You're Welcome

hey 

local $MyList[4] = ["pencere1","pencere2","pencere3","pencere4"]
 
for $i = 1 to UBound($MyList) -1
   
    if ProcessExists($MyList[$i]) Then
        ProcessClose("abxde.exe")
        ProcessClose("blabla.exe") 
        ExitLoop
    EndIf
next

it is not working. is it possible like this ? with processexists and processclose

[Gianni]

sorry, there is a little bug,
instead of
... for $i = 1 to ...
must be used this
... for $i = 0 to ...

the loop begins from 0 and not from 1 otherwise you loose the first item

also, if you use ProcessExists() , you must use the full name of the process
example:
"pencere1.exe","pencere2.exe","pencere3.exe","pencere4.exe"