Page 1 sur 1
[R] Récupérer tout une liste.
Posté : mar. 22 déc. 2009 21:22
par 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.
Re: [..] Récupérer tout une liste.
Posté : mar. 22 déc. 2009 22:34
par 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.
Re: [..] Récupérer tout une liste.
Posté : mer. 23 déc. 2009 00:21
par mangaskiff
J'ai compris a quoi sert la fonction WinList() mais je ne comprend pas comment l'utiliser pour obtenir ce que je veux.
Re: [..] Récupérer tout une liste.
Posté : mer. 23 déc. 2009 06:52
par 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 ...
Re: [..] Récupérer tout une liste.
Posté : mer. 23 déc. 2009 11:19
par 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.
Re: [..] Récupérer tout une liste.
Posté : mer. 23 déc. 2009 15:28
par 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 :
il te faudras remplacer cette ligne et enregistrer toute les donné dans un autre tableau pour comparer