AutoIt

2013-08-27 15 views
5

'u kullanarak tüm açık pencerelerin bir listesini alın Tüm pencerelerde minimize, büyüt ve kapat düğmelerimden kurtulmaya çalışıyorum. etrafında Googling bunu buldum:AutoIt

$h = WinGetHandle("[CLASS:Notepad]") 

$iOldStyle = _WinAPI_GetWindowLong($h, $GWL_STYLE) 
$iNewStyle = BitXOr($iOldStyle, $WS_SYSMENU) 
_WinAPI_SetWindowLong($h, $GWL_STYLE, $iNewStyle) 
_WinAPI_ShowWindow($h, @SW_SHOW) 

Bu iyi çalışır, şimdi ben sadece bu kod ile tüm pencereleri üzerinde yineleme gerekiyor ve ben bittim. Sistemdeki tüm HWNDs listesini nasıl alabilirim?

cevap

6

Sen WinList kullanarak tüm açık pencerelerin listesini alabilirsiniz: iyi

$aWindows = WinList() 
For $i=1 To $aWindows[0][0] 

    ; skip windows without a title 
    If $aWindows[$i][0] = '' Then ContinueLoop 

    ;use the HWND to get the state of the window 
    $iWndState = WinGetState($aWindows[$i][1]) 

    ; here you could filter out the windows you don't want to modify 
    ConsoleWrite($aWindows[$i][0] & ': ') 
    If BitAND($iWndState,1) = 1 Then ConsoleWrite(' exists') 
    If BitAND($iWndState,2) = 2 Then ConsoleWrite(' visible') 
    If BitAND($iWndState,4) = 4 Then ConsoleWrite(' enabled') 
    If BitAND($iWndState,8) = 8 Then ConsoleWrite(' active') 
    If BitAND($iWndState,16) = 16 Then ConsoleWrite(' minimised') 
    If BitAND($iWndState,32) = 32 Then ConsoleWrite(' maximised') 
    ConsoleWrite(@CRLF) 
Next 
+0

çalışır. Teşekkürler! :) –

+1

Anonim downvoter onun downvote nedenini ayrıntılandırabilirse çok nazik olurdu. Cevabını daha yeni anlamadıysanız lütfen yorum yapın ve size yardımcı olmaya çalışacağım. Yoksa bu aşağılama çılgınlığı mıydı? http://fs2.directupload.net/images/150804/4pmpidv8.png – mrt

İlgili konular