AutoIt Français

Bonjour,
Je cherche à positionner automatiquement un check type 'radio' à ON en fonction de la fenêtre active

► Afficher le texte

#include <File.au3>
#include <GDIPlus.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <ButtonConstants.au3>
#include <ListboxConstants.au3>

$MainGUI = GUICreate("Main GUI", 500, 603, -1, -1)
$Options = GUICtrlCreateButton("Options", 305, 5, 80, 25, $WS_GROUP, BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE))
GUISetState()
;Gui Options
$OptionsGUI = GUICreate("Options", 255, 350, 120, 40,BitOR($WS_SYSMENU,$WS_DLGFRAME,$WS_POPUP,$WS_CLIPSIBLINGS),bitor($WS_EX_MDICHILD,$WS_EX_CLIENTEDGE),$MainGUI)
$SliderONOFF = GUICtrlCreateCheckbox("Optional Slider Section", 10, 10, 170, 17)
GUICtrlSetFont(-1, 10, 450, 0, "MS Sans Serif")
If GUICtrlSetState(-1,$GUI_CHECKED) Then
    GUICtrlSetTip(-1,"Slider Section")
EndIf
$Group5 = GUICtrlCreateGroup(" Extra Send Commands ", 5, 35, 248, 50)
GUICtrlSetFont(-1, 10, 450, 0, "MS Sans Serif")
$Radio41 = GUICtrlCreateRadio("None", 20, 50, 60, 17)
GUICtrlSetFont(-1, 10, 450, 0, "MS Sans Serif")
GUICtrlSetTip(-1,"GUI Normal")
$Radio42 = GUICtrlCreateRadio("2 Extra", 90, 50, 60, 17)
GUICtrlSetFont(-1, 10, 450, 0, "MS Sans Serif")
GUICtrlSetTip(-1,"GUI with 2 Extras")
$Radio43 = GUICtrlCreateRadio("5 Extra", 160, 50, 60, 17)
GUICtrlSetFont(-1, 10, 450, 0, "MS Sans Serif")
GUICtrlSetTip(-1,"GUI with 5 Extras")
$Group6 = GUICtrlCreateGroup(" Profiles ", 5, 97, 248, 220)
GUICtrlSetFont(-1, 10, 450, 0, "MS Sans Serif")
$ProfilesList = GUICtrlCreateList("Default",8, 120, 240, 130)
GUICtrlSetFont(-1, 10, 450, 0, "MS Sans Serif")
GUICtrlSetTip(-1,"Choose a profile")
$InputProfileName = GUICtrlCreateInput("", 10, 250, 175, 25)
GUICtrlSetFont(-1, 10, 450, 0, "MS Sans Serif")
GUICtrlSetTip(-1,"Enter a profile name")
$NewProfileName = GUICtrlCreateButton("New", 190, 250, 50, 25)
GUICtrlSetFont(-1, 10, 450, 0, "MS Sans Serif")
GUICtrlSetTip(-1,"Save a new profile name")
$UseProfileName = GUICtrlCreateButton("Use", 10, 285, 80, 25)
GUICtrlSetFont(-1, 10, 450, 0, "MS Sans Serif")
GUICtrlSetTip(-1,"Use a profile name")
$DelProfileName = GUICtrlCreateButton("Delete", 90, 285, 80, 25)
GUICtrlSetFont(-1, 10, 450, 0, "MS Sans Serif")
GUICtrlSetTip(-1,"Delete a profile name")
$ClrHistory = GUICtrlCreateButton("Clr History", 170, 285, 80, 25)
GUICtrlSetFont(-1, 10, 450, 0, "MS Sans Serif")
GUICtrlSetTip(-1,"Clear the history profile list")
$ExitProfile = GUICtrlCreateButton("Done", 130, 322, 120, 25)
GUICtrlSetFont(-1, 10, 450, 0, "MS Sans Serif")
GUICtrlSetTip(-1,"Quit the profile window")
GUISetState(@SW_HIDE,$OptionsGUI)
$OptionsGUIStatus = False
;GUICtrlSetState($NewProfileName,$GUI_DISABLE)
GUICtrlSetState($UseProfileName,$GUI_DISABLE)
;GUICtrlSetState($DelProfileName,$GUI_DISABLE)
GUICtrlSetState($ClrHistory,$GUI_DISABLE)

[color=#FF0000]If GUICtrlSetState($MainGUI,$GUI_SHOW) Then GUICtrlSetState($Radio41,$GUI_CHECKED)[/color]

While 1
    $nMsg = GUIGetMsg()

    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Options
            GUISwitch($OptionsGUI)
            if $OptionsGUIStatus = true Then
                GUISetState(@SW_HIDE,$OptionsGUI)
                $OptionsGUIStatus=False
            Else
                GUISetState(@SW_SHOW,$OptionsGUI)
                $OptionsGUIStatus=True
            EndIf
    EndSwitch
Wend

La gui ci-dessus est une fenêtre fille.
A son ouverture, je voudrais forcer le bouton radio '$Radio41' à ce placer au 'vert'

si la fenêtre principale $MainGUI est active.
J'ai bien essayé cela mais sans succés:

Code : Tout sélectionner

If GUICtrlSetState($MainGUI,$GUI_SHOW) Then GUICtrlSetState($Radio41,$GUI_CHECKED)

Quelle est mon erreur SVP ?

J'ai aussi essayé cela sans succés:

Code : Tout sélectionner

If GUISetState(@SW_SHOW,$MainGUI) Then GUICtrlSetState($Radio41,$GUI_CHECKED)

Ouvrez un dico / traducteur et regarder à Set et Get

Le set (GUISetState) permet de Mettre un état tandis que Get (GUIGetState) permet de récupérer un état.

Donc dans un If, vous testez l'état de la fenêtre.

=> GUIGetState

Regardez l'aide de cette fonction pour connaitre les valeurs retournées.

Désolé, mais je crois que la fonction GUIGetState n'existe pas en 3.3.6.1

Il faut savoir qu'un GUI c'est une appellation pour les humains.
Pour Windows, c'est juste une fenetre, dont on peut recuperer le status avec WinGetState

... zeshrek, toujours aussi rapide.

En effet, remplacez GUI par Win et le tour est joué (Vous auriez peut être pu trouver tout seul

)

J'avoue que oui, mais là , je n'y avais pas pensé.

Merci !!!

Pour info,
cela donne donc ceci:

Code : Tout sélectionner

Func SetRadioOptionsGUI(); test quel bouton radio de la GUI option est actif à l'ouverture
    If BitAND(WinGetState($MainGUI),2) Then
        GUICtrlSetState($Radio41,$GUI_CHECKED)
    ElseIf BitAND(WinGetState($MainGUI2Extras),2) Then
        GUICtrlSetState($Radio42,$GUI_CHECKED)
    ElseIf BitAND(WinGetState($MainGUI5Extras),2) Then
        GUICtrlSetState($Radio43,$GUI_CHECKED)
    EndIf
EndFunc

Merci encore à tous !

AutoIt Français

[R] Activer un check radio en fonction d'un GUI

[R] Activer un check radio en fonction d'un GUI

Re: [..] Activer un check radio en fonction d'un GUI

Re: [..] Activer un check radio en fonction d'un GUI

Re: [..] Activer un check radio en fonction d'un GUI

Re: [..] Activer un check radio en fonction d'un GUI

Re: [..] Activer un check radio en fonction d'un GUI

Re: [..] Activer un check radio en fonction d'un GUI

Re: [R] Activer un check radio en fonction d'un GUI