[R] Utilisation de Controlclick()

[ferrierd]

Bonjour,

Je cherche à simuler un click de souris sur un bouton de mon programme principal à partir d'un programme externe.

Programme Principal:

► Afficher le texte

Code : Tout sélectionner

#NoTrayIcon
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_icon=..\sauvegarde-mise-a-jour-icone-5758.ico
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Date.au3>



Opt("TrayMenuMode",1)
Opt("TrayAutoPause",1); Default tray menu items (Script Paused/Exit) will not be shown.
$AboutItem  = TrayCreateItem("A Propos")
$Separateur1= TrayCreateItem("")
$Save_NowItem = TrayCreateItem("Lancer Sauvegarde")
$Bleu = "0xced8fd"

$Form1 = GUICreate("Notify", 400, 400, 100, 100, $WS_POPUP, BitOR($WS_EX_TOPMOST,$WS_EX_LAYERED,$WS_EX_TOOLWINDOW))
GUISetBkColor($bleu)

$Button_test = GUICtrlCreateButton("+", 264, 226, 41, 41, 0)
GUICtrlSetFont(-1, 28, 800, 0, "Comic Sans MS")

GUISetState(@SW_SHOW)
;GuiSetState(@SW_HIDE)
TraySetState()
WinSetTrans($Form1, "", 100)

Global $AboutItem, $ExitItem

While 1
    $msg1 = GUIGetMsg()
    switch $msg1
        Case $Button_test
            msgbox (4096,"","Bouton appuyé")
            _Notification()
    EndSwitch

    $msg = TrayGetMsg()
    Select
        Case $msg = 0
            ContinueLoop
        Case $msg = $AboutItem
            Msgbox(64 + 262144, "A Propos:","Test")
    Case $msg = $ExitItem
            ExitLoop
    EndSelect
WEnd

Func _Notification()
    TrayItemDelete($Save_NowItem)
    TrayItemDelete($AboutItem)
    TrayItemDelete($Separateur1)
    $AboutItem  = TrayCreateItem("A Propos")
    TrayCreateItem("")
    $More10mnItem = TrayCreateItem("+10 min")
    $More5mnItem = TrayCreateItem("+5 min")
    $Save_NowItem = TrayCreateItem("Lancer Sauvegarde")
    TrayCreateItem("")
    $ExitItem   = TrayCreateItem("Annuler Sauvegarde")
    GUISetState(@SW_SHOW ,$Form1)
EndFunc     ;==> _Notification

Programme qui simule le click sur le bouton

► Afficher le texte

Code : Tout sélectionner

While 1

    WinSetState("Notify", "", @SW_SHOW)
    WinActivate("Notify","")
    ControlClick("Notify","","[ID:3]")
    
    Exit
WEnd

Cela fonctionne parfaitement à partir du moment ou ma Form Principal ("$Form1") est visible.

Si $Form1 est cachée, mon simulateur affiche bien ma form, elle s'active, mais impossible d'effectuer la 3ème opération (ControlClick) même si manuellement je clique sur le bouton.

Il doit me manquer une commande ou autre chose pour rendre le bouton actif, mais je ne vois pas...
Par avance Merci

[ZDS]

Hello,

J'ai un début de réponse à te fournir : Tu utilises GuiSetState dans ton programme principal, et WinSetState dans le secondaire. Même si elles semblent vouloir faire la même chose, PEUT-ÊTRE que l'une et l'autre agissent différemment au final et qu'elles laissent la fenêtre dans un état zombie. Car si tu changes ton bloc GUISetState(@SW_HIDE) par GUISetState(@SW_SHOW) --/-- WinSetState($Form1,"",@SW_HIDE), ton script remarche sans problème (il est visible pendant une fraction de seconde entre les deux opérations, mais la plupart du temps il n'apparait que dans la barre des tâches).

J'ai essayé de modifier ton "cliqueur" pour marcher avec le GUISetState(@SW_HIDE), en remplaçant ton WinSetState("Notify", "", @SW_SHOW) par un GUISetState(@SW_SHOW, WinGetHandle("Notify")), mais ça ne fonctionne pas. A voir si ça peut être amélioré.

En tout cas, cacher par GUISetState et ré-afficher par WinSetState ne semble pas être la chose à faire. Utilise la même fonction dans les deux cas et ça devrait aller.

Dis moi si ça passe.

A bientôt !

PS: J'oubliais de te dire, avec le "GuiSet SHOW - WinSet HIDE" tu n'es pas obligé d'afficher/activer ta fenêtre principale pour faire ton controlClick, si ça peut t'éviter des ennuis.

[ferrierd]

Bonjour

Et merci ZDS de ta réponse explicite sur cette fenetre zombie.

Je confirme cela fonctionne très bien en utilisant les codes suivants:
- GUISetState(@SW_SHOW) au départ affichage rapide la fenetre du prog principal
- puis je n'utilise plus que la fonction WinsetState (que ce soit dans le prog principal que depuis le lanceur) avec les options @SW_HIDE / @SW_SHOW pour afficher ou non ma fenetre principale

Par contre avec GUISetState(@SW_SHOW, WinGetHandle("Notify")) impossible à faire fonctionner le lanceur...

Il doit y avoir une subtilité que je ne maitrise pas encore...

Dans tous les cas merci...
Cordialement,
David