[R] Multi WinWaitActive

[mortrevere]

Bonjour a tous !

Je vous expose mon probleme :

Il y a quelques temps j'ai crée un programme interdisant l'accès à certaine fenêtre,
le programme détecte le titre de la fenêtre puis la ferme si c'est la fenêtre attendu mais maintenant je voudrais que le programme attende soit pour une fenêtre ou pour une autre.
L'algorithme :
Si fenetre active est "Bienvenue sur Facebook" ou est "Connexion | Facebook" alors fermer la fenetre

Le code :

Code : Tout sélectionner

While 1
    WinWaitActive("Bienvenue sur Facebook - Mozilla Firefox")
    WinClose("Bienvenue sur Facebook - Mozilla Firefox")
    If Not IsDeclared("sToolTipAnswer") Then Local $sToolTipAnswer
    $sToolTipAnswer = ToolTip("Attention ! " & @CRLF & "Le site http://www.facebook.com a été détecté comme dangereux, pour votre sécurité vous ne pouvez y accéder pour le moment", 0, 0, "Attention !", 2, 0)
    Sleep(7000)
    $sToolTipAnswer = ToolTip("")
WEnd
 

Avait vous compris mon probleme ?

Merci d'avance !

[Natsu]

Pourquoi faire WinWaitActive ? juste un WinActive suffit pour ce que tu veux faire

[Yogui]

Code : Tout sélectionner

$motsclefs = "Bienvenue sur Facebook - Mozilla Firefox}Autoit Français - Mozilla Firefox"
$motarray = StringSplit($motsclefs, "}")
;~ _ArrayDisplay($motarray)
while 1
recherche()
sleep(200)
wend
Func recherche()
    Global $i = 1
    For $i = 1 To $motarray[0] Step 1
        TrayTip("",$motarray[$i],100)
        if WinActive($motarray[$i]) Then
        WinClose($motarray[$i])
        $sToolTipAnswer = ToolTip("Attention ! " & @CRLF & "Le site "&$motarray[$i] &"a été détecté comme dangereux, pour votre sécurité vous ne pouvez y accéder pour le moment", 0, 0, "Attention !", 2, 0)
    EndIf

    Next
EndFunc   ;==>recherche

[mortrevere]

Merci je teste ca ce soir
edit : Merci ca marche, j'ai juste enlevé le traytip qui m'embeter