combo and checkbox

[Em4gdn1m 0]

Hey everyone, I'm curious if there is a way to incorporate a checkbox with a combo GUICtrl?

so for instance I have a GUI that has a bunch of checkboxes that allow me to open certain programs as needed.  (this is just some parsing of my code, sorry, noob here and not sure what the preferred method of displaying code is, please enlighten me)

    $L0742 = GUICtrlCreateCheckbox("L07 4.2", 110, 320, 100)
    $L07502 = GUICtrlCreateCheckbox("L07 5.0.2", 110, 350, 100)
    $GenComm = GUICtrlCreateCheckbox("GenComm", 110, 380, 100)
    $Templates = GUICtrlCreateCheckbox("Templates", 110, 410, 100)
    $MCT = GUICtrlCreateCheckbox("MCT", 110, 440, 100)
    $Desktop_Shortcuts = GUICtrlCreateCheckbox("Desktop Shortcuts by Tester", 110, 470, 200)

 

...

Case $msg = $RunBtn
            RunPrograms()

 

...

Func RunPrograms()

    if GUICtrlRead($L0742) = $GUI_CHECKED then Run("C:\Program Files\Varian\Paxscan\L07 Rel4.2\viva\viva.exe", "")
    if GUICtrlRead($L07502) = $GUI_CHECKED then Run("C:\Program Files\Varian\Paxscan\L07 Rel5\viva\viva.exe", "")
    if GUICtrlRead($GenComm) = $GUI_CHECKED then Run("\\Fpanelfs1\FPShared\Desktop_Shortcuts_by_Tester\Matt\CPI Generator\CPI Generator Windows 7 64 Bit\GenComm\GenComm.NET.exe", "")
    if GUICtrlRead($Templates) = $GUI_CHECKED then ShellExecute("\\Fpanelfs1\FPProjects\Documentation Controlled\Test_Templates")
    if GUICtrlRead($MCT) = $GUI_CHECKED then Run("\\Fpanelfs1\FPProjects\Documentation Controlled\Manufacturing Software\MCT\MCT.exe","")
    if GUICtrlRead($Desktop_Shortcuts) = $GUI_CHECKED then ShellExecute("\\Fpanelfs1\fpshared\Desktop_Shortcuts_by_Tester")
EndFunc

 

so i click some checkboxes, and hit a run button and the programs which are checked run, great.

BUT i want to add a bunch of options under one checkbox. A combo that will list a bunch of versions of a program that can be opened. something like this... but I want that program to be part of a checkbox

$ViVAComboBox = GUICtrlCreateCombo("L01 Rel 13", 110, 320, 100)

GUICtrlSetData($ViVAComboBox, "L04|L05|L07 Rel 4.2|L07 Rel 5.0.2|L09", "L07 Rel 4.2")

 

is this possible? is there another GUICtrl that does this better that i am not aware of?

 

 

[BrewManNH 978]

There isn't a control that combines a checkbox and a combobox, but you could put a checkbox next to one and disable the combo until that check box has been checked.

[Em4gdn1m 0]

that sounds like it could work. anything to get me started? still really noob at this stuff.

 

mainly how do i read what is in the combo box and run that specific program?

Edited December 23, 2016 by Em4gdn1m
clarification

[Em4gdn1m 0]

so basically I added

While 1

GUICtrlRead($ViVACheckBox)

if GUICtrlRead($ViVACheckBox) = $GUI_CHECKED then GUICtrlSetState($ViVAComboBox, $GUI_ENABLE)

if GUICtrlRead($ViVACheckBox) = $GUI_UNCHECKED then GUICtrlSetState($ViVAComboBox, $GUI_DISABLE)

WEnd

and then

if GUICtrlRead($ViVAComboBox) == "L07 Rel 4.2" then Run("The L07 Rel 4.2 destination here", "")
if GUICtrlRead($ViVAComboBox) == "L01 Rel 13" then Run("The L01 Rel 13 destination here", "")
...

but it's not caring if the combobox is enabled or not. it still just runs the program

and also, the constant checking of the state of the checkbox is kinda weird... id image there is some way to only check the state if the state changes?

[BrewManNH 978]

This might help clean up the code a bit and make it easier to add additional items later on to the combo box.

While 1
    Switch GUICtrlRead($ViVACheckBox)
        Case $GUI_CHECKED
            GUICtrlSetState($ViVAComboBox, $GUI_ENABLE)
        Case Else
            GUICtrlSetState($ViVAComboBox, $GUI_DISABLE)
    EndSwitch
WEnd
Switch GUICtrlRead($ViVAComboBox)
    Case "L07 Rel 4.2"
        Run("The L07 Rel 4.2 destination here", "")
    Case "L01 Rel 13"
        Run("The L01 Rel 13 destination here", "")
    Case ...
EndSwitch

As to the combo being read regardless of whether it's enabled or not, that's normal. You have to code the script so that it checks whether it needs to read that combobox or not when you go to run your programs.

[Em4gdn1m 0]

While 1
    Switch GUICtrlRead($ViVACheckBox)
        Case $GUI_CHECKED
            GUICtrlSetState($ViVAComboBox, $GUI_ENABLE)
        Case Else
            GUICtrlSetState($ViVAComboBox, $GUI_DISABLE)
    EndSwitch
WEnd

This part seems to do nothing with the constant checking of the state, and likewise, nothing different than what I had, though definitely a lot prettier which I like. but there is this constant flashing of the combo box that began when i added my while statement, and didn't stop with yours.

11 minutes ago, BrewManNH said:

 

As to the combo being read regardless of whether it's enabled or not, that's normal. You have to code the script so that it checks whether it needs to read that combobox or not when you go to run your programs.

I tried  doing

if GUICtrlRead($ViVAComboBox) = $GUI_ENABLE & "L07 Rel 4.2" then Run("FILE", "")

;and 

if GUICtrlRead($ViVAComboBox) == $GUI_ENABLE & "L07 Rel 4.2" then Run("file", "")

but neither seemed to work. not sure what to try. I want it to only run if the ViVACheckbox is checked... so

if GUICtrlRead($ViVACheckBox)= $GUI_CHECKED then ;IDK NOW

 

[Em4gdn1m 0]

 

neither

If GUICtrlRead($ViVACheckBox) = $GUI_ENABLE then
    Switch GUICtrlRead($ViVAComboBox)
        Case "L01 Rel 13"
            Run("C:\Program Files\Speccy\Speccy64.exe", "")
        Case "L04"
            Run("The L01 Rel 13 destination here", "")
        Case "L05"
            Run("The L01 Rel 13 destination here", "")
        Case "L07 Rel 4.2"
            Run("The L01 Rel 13 destination here", "")
        Case "L07 Rel 5.0.2"
            Run("The L01 Rel 13 destination here", "")
        Case "L09"
            Run("The L01 Rel 13 destination here", "")
    EndSwitch
EndIf

nor

If GUICtrlRead($ViVAComboBox) = $GUI_ENABLE then
...

works at opening a program at all

[Em4gdn1m 0]

actually...

If GUICtrlRead($ViVACheckBox) = $GUI_CHECKED then
        Switch GUICtrlRead($ViVAComboBox)
            Case "L01 Rel 13"
                Run("C:\Program Files\Speccy\Speccy64.exe", "")
            Case "L04"
                Run("The L01 Rel 13 destination here", "")
            Case "L05"
                Run("The L01 Rel 13 destination here", "")
            Case "L07 Rel 4.2"
                Run("The L01 Rel 13 destination here", "")
            Case "L07 Rel 5.0.2"
                Run("The L01 Rel 13 destination here", "")
            Case "L09"
                Run("The L01 Rel 13 destination here", "")
        EndSwitch
    EndIf

worked, now it's just the constant checking of the checkbox. any ideas on that?