[已解决]radio或checkbox如何成对建立？

showshow

可能问题没描述清楚，

想在GUI上创建多组radio按钮,组与组之间的选取不干扰

就如radio1，radio2成一组形成单选（选中radio1就取消选中radio2）
    radio3，radio4成一组形成单选（选中radio3就取消选中radio4）
    .....
      .....
以次类推，最重要的是组与组之间的选取不干扰，不知可否实现？

或者checkbox也可以~

=======感谢楼下3位大虾==========

user3000

回复 1# showshow


    半天没人回应楼主, 那么我应一声:
请查阅 GuiCtrlCreatGroup 函数

楼下继续来人接力?

netegg

[au3]#include <GUIConstantsEx.au3>

Example()

Func Example()
        GUICreate("My GUI group") ; will create a dialog box that when displayed is centered

        Local $x = 10, $y = 10, $w = 50, $h = 16
        For $i = 1 To 6
                GUICtrlCreateRadio(2 * $i, $i*$x*5, $y + 2, $w, $h)
                GUICtrlCreateRadio(2 * $i + 1, $i*$x*5, $y + 22, $w, $h)
                GUICtrlCreateGroup('', -99, -99, 1, 1)
        Next
        GUISetState() ; will display an empty dialog box

        ; Run the GUI until the dialog is closed
        While 1
                Local $msg = GUIGetMsg()

                If $msg = $GUI_EVENT_CLOSE Then ExitLoop
        WEnd
EndFunc   ;==>Example
[/au3]

502762378

1. 
   
2. #include <ButtonConstants.au3>
   
3. #include <WindowsConstants.au3>
   
4. #Region ### START Koda GUI section ### Form=
   
5. Opt("GUIOnEventMode", 1)
   
6. $Form1 = GUICreate("Form1", 232, 186, 192, 124)
   
7. $Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 24, 16, 89, 25)
   
8. $Checkbox2 = GUICtrlCreateCheckbox("Checkbox2", 24, 48, 89, 25)
   
9. $Checkbox3 = GUICtrlCreateCheckbox("Checkbox3", 24, 88, 89, 25)
   
10. $Checkbox4 = GUICtrlCreateCheckbox("Checkbox4", 24, 128, 89, 25)
    
11. GUISetOnEvent(-3, "gui")
    
12. GUICtrlSetOnEvent($Checkbox1, "gui")
    
13. GUICtrlSetOnEvent($Checkbox2, "gui")
    
14. GUICtrlSetOnEvent($Checkbox3, "gui")
    
15. GUICtrlSetOnEvent($Checkbox4, "gui")
    
16. GUISetState(@SW_SHOW)
    
17. #EndRegion ### END Koda GUI section ###
    
18. 
    
19. While 1       
    
20.         Sleep(100)
    
21. WEnd
    
22. 
    
23. Func gui()
    
24.     Switch @GUI_CtrlId
    
25.         Case -3
    
26.             Exit
    
27.         Case $Checkbox1 To $Checkbox2
    
28.             DllCall("user32.dll","Int","CheckRadioButton","hwnd",$Form1,"Int",$Checkbox1,"Int",$Checkbox2,"Int",@GUI_CtrlId)
    
29.         Case $Checkbox3 To $Checkbox4
    
30.            DllCall("user32.dll","Int","CheckRadioButton","hwnd",$Form1,"Int",$Checkbox3,"Int",$Checkbox4,"Int",@GUI_CtrlId)
    
31.     EndSwitch
    
32. EndFunc
    
33. 
    
34. 
    

复制代码

plutosherry

好东西，正好用了

menfan1

这个方法不错哈。。