Ace08 Posted December 6, 2010 Share Posted December 6, 2010 uhm guy can someone tell me whats wrong with my script the delimiter label and the inputbox keeps flickering expandcollapse popup#include <GUIConstantsEx.au3> #include <WindowsConstants.au3> NewFormFunc() Func NewFormFunc() $NewForm = GUICreate("New Tie-Up", 800 ,600,-1,-1);New Form GUI GUICtrlCreateLabel("Conduit Name", 10, 15) GUICtrlCreateLabel("Locator Code", 235, 15) GUICtrlCreateLabel("Short Code", 345, 15) $ConName = GUICtrlCreateInput("", 80, 8, 150, 20) $LCode = GUICtrlCreateInput("", 302, 8, 35, 20) $SCode = GUICtrlCreateInput("", 400, 8, 30, 20) GUICtrlCreateGroup("Layout", 10, 40, 90, 80) $LLine = GUICtrlCreateRadio("Line", 15, 60, 50, 20) $LDelim = GUICtrlCreateRadio("Multi-Line", 15, 80, 62, 20) GUICtrlCreateGroup("", -99, -99, 1, 1) ;close group $Tracking = GUICtrlCreateCheckbox("Own Tracking Number?", 110, 40, 150, 20) GUICtrlSetState($Tracking, $GUI_CHECKED) $Back = GUICtrlCreateButton("Back", 710, 565, 80) GUICtrlCreateGroup("", 100, 50, 80, 70) $DDel = GUICtrlCreateRadio("Position", 110, 70, 60, 20) $DPos = GUICtrlCreateRadio("Delimiter", 110, 90, 60, 20) GUICtrlCreateGroup("", -99, -99, 1, 1) ;close group $a = GUICtrlCreateLabel("Delimiter", 190, 60,Default,Default,$WS_DISABLED) $Delim = GUICtrlCreateInput("", 200, 80, 15, 20,$WS_DISABLED) GUISetState() While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit Case $Back GUIDelete($NewForm) MainFormFunc() Case $DDel And BitAND(GUICtrlRead($DDel), $GUI_CHECKED) = $GUI_CHECKED If GUICtrlGetState($a) = 144 Then GUICtrlSetState($a, $GUI_ENABLE) GUICtrlSetState($Delim, $GUI_ENABLE) Else EndIf Case $DPos And BitAND(GUICtrlRead($DPos), $GUI_CHECKED) = $GUI_CHECKED If GUICtrlGetState($a) = 80 Then GUICtrlSetState($a, $GUI_DISABLE) GUICtrlSetState($Delim, $GUI_DISABLE) Else EndIf EndSwitch WEnd EndFunc Work smarter not harder.My First Posted Script: DataBase Link to comment Share on other sites More sharing options...
trancexx Posted December 6, 2010 Share Posted December 6, 2010 While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit Case $Back GUIDelete($NewForm) MainFormFunc() Case $DDel ;And BitAND(GUICtrlRead($DDel), $GUI_CHECKED) = $GUI_CHECKED ;~ If GUICtrlGetState($a) = 144 Then GUICtrlSetState($a, $GUI_ENABLE) GUICtrlSetState($Delim, $GUI_ENABLE) ;~ Else ;~ EndIf Case $DPos ;And BitAND(GUICtrlRead($DPos), $GUI_CHECKED) = $GUI_CHECKED ;~ If GUICtrlGetState($a) = 80 Then GUICtrlSetState($a, $GUI_DISABLE) GUICtrlSetState($Delim, $GUI_DISABLE) ;~ Else ;~ EndIf EndSwitch WEnd ♡♡♡ . eMyvnE 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