[R] Griser _GUICtrlIpAddress_Create

[duyen]

Bonjour,

Ma question est :

Peut on griser la box IP _GUICtrlIpAddress_Create et en cochant une CheckBox, elle se dégrise ?
Je peus griser des boutons radio et autre mais pas cette Box.

Merci.

[Jerome]

Coucou,

Code : Tout sélectionner

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiIPAddress.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 319, 95, 192, 124)
$Checkbox1 = GUICtrlCreateCheckbox("", 32, 40, 17, 17)
$hIPAddress = _GUICtrlIpAddress_Create($Form1, 80, 40, 130, 21)
$IP = _GUICtrlIpAddress_Set($hIPAddress, "0.0.0.0")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
global $t = 1
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Checkbox1
            If $t = 1 Then
                ControlDisable($hIPAddress,"","")
                $t = 0
            Else
                ControlEnable($hIPAddress,"","")
                $t = 1
            EndIf

    EndSwitch
WEnd
 

Merci d'éditer votre premier message et de mettre [R] dans le titre pour signifier que le post est résolut.


Jérôme

[mikell]

Hmm vu que l'include WinAPI.au3 est déjà présent dans GuiIPAddress.au3, y a donc aussi ça

► Afficher le texte

Code : Tout sélectionner

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiIPAddress.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 319, 95, 192, 124)
$Checkbox1 = GUICtrlCreateCheckbox("", 32, 40, 17, 17)
$hIPAddress = _GUICtrlIpAddress_Create($Form1, 80, 40, 130, 21)
$IP = _GUICtrlIpAddress_Set($hIPAddress, "0.0.0.0")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
global $t = 1
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Checkbox1
            If $t = 1 Then
                _WinAPI_EnableWindow ($hIPAddress, false)
                $t = 0
            Else
                _WinAPI_EnableWindow ($hIPAddress, true)
                $t = 1
            EndIf
    EndSwitch
WEnd

[duyen]

Super, merci pour les commandes.

@+