schnibble Posted May 8, 2006 Share Posted May 8, 2006 Hi, why does not open with GUICtrlSetState a GUICtrlSetOnEvent Function? Line 22 or Line24 expandcollapse popup#include <GUIConstants.au3> Opt("GUICoordMode",1) Opt("GUIResizeMode", 1) Opt("GUIOnEventMode", 1) $parent1 = GUICreate("Parent1") GUISetOnEvent($GUI_EVENT_CLOSE, "SpecialEvents") GUICtrlCreateGroup ("", 70, 20, 30 ,50) $radio1 = GUICtrlCreateRadio ("", 80,30) GUICtrlSetOnEvent(-1, "radio1") $radio2 = GUICtrlCreateRadio ("", 80,50) GUICtrlSetOnEvent(-1, "radio2") GUISetState(@SW_SHOW) While 1 If GUICtrlRead($radio1) = 4 Then GUICtrlSetState ($radio1, $GUI_CHECKED);<<<<< problem Else GUICtrlSetState ($radio2, $GUI_CHECKED);<<<<< problem EndIf Sleep(1000) Wend Func radio1() MsgBox(0, "radio1", "ID=" & @GUI_CTRLID & " WinHandle=" & @GUI_WINHANDLE & " CtrlHandle=" & @GUI_CTRLHANDLE) EndFunc Func radio2() MsgBox(0, "radio2", "ID=" & @GUI_CTRLID & " WinHandle=" & @GUI_WINHANDLE & " CtrlHandle=" & @GUI_CTRLHANDLE) EndFunc Func SpecialEvents() Exit EndFunc Link to comment Share on other sites More sharing options...
GaryFrost Posted May 8, 2006 Share Posted May 8, 2006 try: expandcollapse popup#include <GUIConstants.au3> Opt("GUICoordMode",1) Opt("GUIResizeMode", 1) Opt("GUIOnEventMode", 1) $parent1 = GUICreate("Parent1") GUISetOnEvent($GUI_EVENT_CLOSE, "SpecialEvents") GUICtrlCreateGroup ("", 70, 20, 30 ,50) $radio1 = GUICtrlCreateRadio ("", 80,30) GUICtrlSetOnEvent(-1, "radio1") $radio2 = GUICtrlCreateRadio ("", 80,50) GUICtrlSetOnEvent(-1, "radio2") GUISetState(@SW_SHOW) While 1 If GUICtrlRead($radio1) = 4 Then ControlClick($parent1,"",$radio1) ;~ GUICtrlSetState ($radio1, $GUI_CHECKED);<<<<< problem Else ControlClick($parent1,"",$radio2) ;~ GUICtrlSetState ($radio2, $GUI_CHECKED);<<<<< problem EndIf Sleep(1000) Wend Func radio1() MsgBox(0, "radio1", "ID=" & @GUI_CTRLID & " WinHandle=" & @GUI_WINHANDLE & " CtrlHandle=" & @GUI_CTRLHANDLE) EndFunc Func radio2() MsgBox(0, "radio2", "ID=" & @GUI_CTRLID & " WinHandle=" & @GUI_WINHANDLE & " CtrlHandle=" & @GUI_CTRLHANDLE) EndFunc Func SpecialEvents() Exit EndFunc SciTE for AutoItDirections for Submitting Standard UDFs Don't argue with an idiot; people watching may not be able to tell the difference. Link to comment Share on other sites More sharing options...
schnibble Posted May 8, 2006 Author Share Posted May 8, 2006 Thanks alot!! Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now