[R] Récupérer tout une liste.

[mangaskiff]

Bon voilà j'ai cherché mais je n 'ai pas trouver ce qu'il me fallait.

Alors je vous demande comment dans ce Code:

Code : Tout sélectionner

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ###
$Form1 = GUICreate("MultiSend  1.0", 313, 434, 192, 124)
$List1 = GUICtrlCreateList("", 24, 16, 257, 253)
$ADD = GUICtrlCreateButton("Add", 8, 288, 65, 49, $WS_GROUP)
$DELET = GUICtrlCreateButton("Retirer", 216, 288, 65, 49, $WS_GROUP)
$GO = GUICtrlCreateButton("Go", 88, 288, 113, 49, $WS_GROUP)
$STOP = GUICtrlCreateButton("Stop", 8, 352, 273, 41, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $ADD
            $R = Random(1,9999999,1)
            Sleep(6000)
            $Tilte = WinGetTitle("")
            Sleep(100)
            $m_Title = WinSetTitle($Tilte,"",$Tilte & $R)
            Sleep(100)
            $Set = GUICtrlSetData($List1,$Tilte & $R)
        Case $GO
            $l1 =GUICtrlRead($List1)
             MsgBox(0, "",$l1)
    EndSwitch
WEnd

 

Je pourrai récupérer tout les titre des fenêtre qui on été ajouter pour réutilisé leur nom après.

[Tlem]

En faisant une liste de départ (avant de lancer le code) puis une liste d'arrivée (lorsque le code est terminé).

La commande pour la liste : WinList()
Le reste c'est du contrôle de tableaux.

[mangaskiff]

J'ai compris a quoi sert la fonction WinList() mais je ne comprend pas comment l'utiliser pour obtenir ce que je veux.

[Tlem]

Hé bien si vous avez deux tableaux, un avant et un après, la différence des deux vous donnera la liste des nouvelles fenêtres ...

[mangaskiff]

Désolé je me suis mal exprimé en faite je n'arrive pas à l'utilisé dans mon code .

A chaque fois sa me met des fenêtre invisible et il y en a un tas il y-a un code dans la doc mais je le comprend pas.

[ayuckers]

Hello, Voila j'ai rajouter la fonction Winlist() dans ton exemple
quand tu clique sur Go sa affiche Juste les appli ouverte sur le bureau

Apres au lieu d'afficher dirrectement la list il faudra manipuler les tableau comme Tlem l'a dit plus haut

► Afficher le texte

Code : Tout sélectionner

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <WindowsConstants.au3>
#include <Array.au3>

Global $i, $var

#Region ### START Koda GUI section ###
$Form1 = GUICreate("MultiSend  1.0", 313, 434, 192, 124)
$List1 = GUICtrlCreateList("", 24, 16, 257, 253)
$ADD = GUICtrlCreateButton("Add", 8, 288, 65, 49, $WS_GROUP)
$DELET = GUICtrlCreateButton("Retirer", 216, 288, 65, 49, $WS_GROUP)
$GO = GUICtrlCreateButton("Go", 88, 288, 113, 49, $WS_GROUP)
$STOP = GUICtrlCreateButton("Stop", 8, 352, 273, 41, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

$var = WinList()


While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $ADD
            $R = Random(1,9999999,1)
            Sleep(6000)
            $Tilte = WinGetTitle("")
            Sleep(100)
            $m_Title = WinSetTitle($Tilte,"",$Tilte & $R)
            Sleep(100)
            $Set = GUICtrlSetData($List1,$Tilte & $R)
        Case $GO
            _AppliOuverte()

    EndSwitch
WEnd

Func _AppliOuverte()
    For $i = 1 to $var[0][0]
          ; condition pour trouver les application ouverte sur le bureau
          If $var[$i][0] <> "" AND IsVisible($var[$i][1]) Then

            GUICtrlSetData($List1, $var[$i][0])
         EndIf
    Next
EndFunc

Func IsVisible($handle) ; pour voir si une appli est visible ou pas sur le bureau
      If BitAnd( WinGetState($handle), 2 ) Then
        Return 1
      Else
        Return 0
      EndIf
EndFunc
 

la ligne suivante dans la fonction _AppliOuverte() permet de remlplire la liste directement :

Code : Tout sélectionner

GUICtrlSetData($List1, $var[$i][0])

il te faudras remplacer cette ligne et enregistrer toute les donné dans un autre tableau pour comparer