[已解决]请问如何实现：选中复选框后，input由灰变成可输入

jokkkka

意思是这样。
    在没有选中复选框时，input框是灰色的
    选中后，input框变成可以输入的状态
请问要怎么实现这个功能？谢谢

landays

#NoTrayIcon
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 384, 168, 192, 114)
$Input1 = GUICtrlCreateInput("Input1", 72, 96, 241, 21)
GUICtrlSetState (-1,$GUI_Disable)
$Checkbox1 = GUICtrlCreateCheckbox("测试", 104, 40, 177, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
        Case $Checkbox1
                        IF BitAND (GUICtrlRead ($Checkbox1),$GUI_CHECKED) Then 
                                GUICtrlSetState ($Input1,$GUI_Enable)
                        Else
                                GUICtrlSetState ($Input1,$GUI_Disable)
                        EndIf
        EndSwitch
WEnd

水木子

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

GUICreate("Form1", 350, 150)
$Input1 = GUICtrlCreateInput("Input1", 32, 56, 121, 21)
GUICtrlSetState(-1, $GUI_DISABLE)
$Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 168, 56, 97, 17)
GUISetState(@SW_SHOW)

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case -3
                        Exit
                Case $Checkbox1
                        If GUICtrlRead($Checkbox1) = 1 Then
                                GUICtrlSetState($Input1, $GUI_ENABLE)
                        Else
                                GUICtrlSetState($Input1, $GUI_DISABLE)
                        EndIf
        EndSwitch
WEnd

水木子

呵呵！热心人真多啊！来晚了。

給点阳光

３楼４楼的代码好像不行啊

ak47gglllk

感谢，学习下，非常感谢