[R] Récupérer clique sur InputBox

[Kagami]

Bonjour,

J'ai déjà recherché quelques réponses sur le forum mais rien qui me satisfasse.
Voilà, ce que je voudrais faire est, dans un Switch, lorsque l'utilisateur clique sur $InputChemin, cela ouvre ma fonction FileOpenDialog.

J'ai essayé plusieurs trucs avec des GetHandle etc mais aucun résultat (Sauf que dès que j'ouvre le logiciel, mon boite de dialogue s'ouvre directement et se réouvre dès que je la ferme)

► Afficher le texte

Code : Tout sélectionner

$InputChemin = GUICtrlCreateInput($IniChemin, 224, 328, 121, 21, BitOR($ES_AUTOHSCROLL,$ES_READONLY))
;===Boucle Principale===
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

        Case $ButtonQuitter
            Exit

        Case $InputChemin
            $ChoixChemin = FileOpenDialog("Veuillez indiquer le chemin de Dofus", @ScriptDir, "Executables (Dofus.exe)")
            GUICtrlSetData($InputChemin, $ChoixChemin)


    EndSwitch
WEnd

Pour ceux qui ont vu le "Dofus.exe", je précise que ce n'est PAS un bot que je fais mais un launcher, la seconde version de mon launcher pour être précis.
La preuve -> http://www.cheat-gam3.com/148-1cheat/do ... post173538 (Pour ceux qui ne veulent pas m'aider parce qu'ils ne me croient pas, je mettrai le code source du programme)

Voilà, merci à celui/celle/ceux qui m'apporteront leur aide!

[silvere]

en général on fait plutôt sa :

► Afficher le texte

Code : Tout sélectionner

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#region ### START Koda GUI section ### Form=
Global $Form1 = GUICreate("Form1", 256, 48, 192, 124)
Global $Input1 = GUICtrlCreateInput("", 8, 16, 193, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_READONLY))
Global $Button1 = GUICtrlCreateButton("...", 208, 20, 25, 17)
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            $ChoixChemin = FileOpenDialog("Veuillez indiquer le chemin de Dofus", @ScriptDir, "Executables (Dofus.exe)")
            GUICtrlSetData($Input1, $ChoixChemin)
    EndSwitch
WEnd
 

Edit : Mais tu peut toujours faire sa :

► Afficher le texte

Code : Tout sélectionner

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <Misc.au3>
#region ### START Koda GUI section ### Form=
Global $Form1 = GUICreate("Form1", 213, 48, 192, 124)
Global $Input1 = GUICtrlCreateInput("", 8, 16, 193, 21, BitOR($GUI_SS_DEFAULT_INPUT, $ES_READONLY))
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###

While 1
    $info = GUIGetCursorInfo()
    If Not @error Then
        If _IsPressed("01") And $info[4] = $Input1 Then ; si on clique gauche sur l'input ...
            $ChoixChemin = FileOpenDialog("Veuillez indiquer le chemin de Dofus", @ScriptDir, "Executables (Dofus.exe)")
            GUICtrlSetData($Input1, $ChoixChemin)
        EndIf
    EndIf
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd
 

[Kagami]

Ca marche impeccable, merci
Je sais pas si tu as jeté un coup d'oeil à la première version mais c'est ce que j'avais fait mais j'ai préféré utilisé une autre méthode cette fois-ci.
Encore merci, résolu.