Drop & Down Menu

HR78 · November 7, 2010

Hello Boys And Girls AU3 Scripters.

I need help.

How I make Drop and Down "or Expand" menu Butons In GUI??

Thanks!

Melba23 · November 7, 2010

HR78,

If I understand what you want correctly, the GUIExtender UDF in my sig should be what you are looking for. :graduated:

If it is not, could you please explain what you want to do in a little more detail.

M23

Edit: Typnig!

Edited November 7, 2010 by Melba23

HR78 · November 7, 2010

HR78,
If I understand what you want correctly, the GUIExtender UDF in my sig should be what you are looking for.
If it is not, could you please explain what you want to do in a little more detail.
M23
Edit: Typnig!

yes man,

Can you give me an example how to do a menu with GUIExtender??

When I click the 1 button to open 3-4 new button ..

Thanks for your time

Melba23 · November 7, 2010

HR78,

There are lots of examples in the topic - but here is one more with 3 hidden buttons accessed via the menu: :graduated:

#include <GUIConstantsEx.au3>

#include "GUIExtender.au3"

; Create GUI full size
$hGUI = GUICreate("Test", 280, 160)

; Create menu
$mFileMenu = GUICtrlCreateMenu("&File")
$mExit_Menu_Item = GUICtrlCreateMenuItem("&Exit", $mFileMenu)
$mViewMenu = GUICtrlCreateMenu("&View")
$mHidden_Menu_Item = GUICtrlCreateMenuItem("&Show More", $mViewMenu)

; Initialise UDF
_GUIExtender_Init($hGUI)

; Create controls on the static part
$hLabel = GUICtrlCreateLabel("", 10, 10, 200, 20)

; Create the controls as normal - but add the section start, end and action lines where needed
$iHidden_Section = _GUIExtender_Section_Start(80, 80)
$hButton_1 = GUICtrlCreateButton("Button 1", 10, 100, 80, 30)
$hButton_2 = GUICtrlCreateButton("Button 2", 100, 100, 80, 30)
$hButton_3 = GUICtrlCreateButton("Button 3", 190, 100, 80, 30)
; Create an invisible action control for this section so we can action it programatically
_GUIExtender_Section_Action($iHidden_Section)
_GUIExtender_Section_End()

; Retract the extendable section
_GUIExtender_Section_Extend($iHiddenSection, False)

GUISetState()

While 1

    $iMsg = GUIGetMsg()
    ; Check for normal AutoIt controls
    Switch $iMsg
        Case $GUI_EVENT_CLOSE, $mExit_Menu_Item
            Exit
        Case $hButton_1
            GUICtrlSetData($hLabel, "Button 1 pressed!")
        Case $hButton_2
            GUICtrlSetData($hLabel, "Button 2 pressed!")
        Case $hButton_3
            GUICtrlSetData($hLabel, "Button 3 pressed!")
        Case $mHidden_Menu_Item
            ; Try and work out why this works!
            _GUIExtender_Section_Extend($iHidden_Section, Not(_GUIExtender_Section_State($iHidden_Section)))
    EndSwitch

    ; Keep menu item in sync with the section state
    If _GUIExtender_Section_State($iHidden_Section) = 0 And BitAND(GUICtrlRead($mHidden_Menu_Item), $GUI_CHECKED) = $GUI_CHECKED Then
        GUICtrlSetState($mHidden_Menu_Item, $GUI_UNCHECKED)
    ElseIf _GUIExtender_Section_State($iHidden_Section) = 1 And BitAND(GUICtrlRead($mHidden_Menu_Item), $GUI_CHECKED) <> $GUI_CHECKED Then
        GUICtrlSetState($mHidden_Menu_Item, $GUI_CHECKED)
    EndIf

WEnd

M23

HR78 · November 7, 2010

no, no ..

if I have a GUI

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("Form1", 633, 447, 192, 124)
$Button2 = GUICtrlCreateButton("Button2", 0, 64, 75, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("Button3", 0, 96, 75, 25, $WS_GROUP)
$Button4 = GUICtrlCreateButton("Button4", 0, 128, 75, 25, $WS_GROUP)
$Button5 = GUICtrlCreateButton("Button5", 0, 160, 75, 25, $WS_GROUP)
$Button6 = GUICtrlCreateButton("Button6", 0, 192, 75, 25, $WS_GROUP)
$Button1 = GUICtrlCreateButton("Button1", 0, 32, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)

While 1
 $nMsg = GUIGetMsg()
 Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit

 EndSwitch
WEnd

how to do when the user clicks on a button to display button 10, 11,12,13, click on a button 2 show buton14, 15.16, and to hide in 10,11,12,13 click on button 3 to display button 17,18,19 and hide .. 14,15,16

Melba23 · November 7, 2010

HR78,

no, no ..

But that is what you asked for!

Can you give me an example how to do a menu with GUIExtender??

Is this more what you want? :graduated:

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

$Form1 = GUICreate("Form1", 633, 447, 192, 124)

$Button1 = GUICtrlCreateButton("Button1", 0, 32, 75, 25)
$Button2 = GUICtrlCreateButton("Button2", 0, 64, 75, 25)
$Button3 = GUICtrlCreateButton("Button3", 0, 96, 75, 25)

$Button10 = GUICtrlCreateButton("Button10", 100, 32, 75, 25)
$Button11 = GUICtrlCreateButton("Button11", 100, 64, 75, 25)
$Button12 = GUICtrlCreateButton("Button12", 100, 96, 75, 25)
$Button13 = GUICtrlCreateButton("Button13", 100, 128, 75, 25)

$Button14 = GUICtrlCreateButton("Button14", 200, 32, 75, 25)
$Button15 = GUICtrlCreateButton("Button15", 200, 64, 75, 25)
$Button16 = GUICtrlCreateButton("Button16", 200, 96, 75, 25)

$Button17 = GUICtrlCreateButton("Button17", 300, 32, 75, 25)
$Button18 = GUICtrlCreateButton("Button18", 300, 64, 75, 25)
$Button19 = GUICtrlCreateButton("Button19", 300, 96, 75, 25)

_AllHide()

GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            _AllHide()
            For $i = $Button10 To $Button13
                GUICtrlSetState($i, $GUI_SHOW)
            Next
        Case $Button2
            _AllHide()
            For $i = $Button14 To $Button16
                GUICtrlSetState($i, $GUI_SHOW)
            Next
        Case $Button3
            _AllHide()
            For $i = $Button17 To $Button19
                GUICtrlSetState($i, $GUI_SHOW)
            Next
    EndSwitch
WEnd

Func _AllHide()
    For $i = $Button10 To $Button19
        GUICtrlSetState($i, $GUI_HIDE)
    Next
EndFunc

M23

HR78 · November 7, 2010

HR78,

But that is what you asked for!

Is this more what you want? :graduated:

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

$Form1 = GUICreate("Form1", 633, 447, 192, 124)

$Button1 = GUICtrlCreateButton("Button1", 0, 32, 75, 25)
$Button2 = GUICtrlCreateButton("Button2", 0, 64, 75, 25)
$Button3 = GUICtrlCreateButton("Button3", 0, 96, 75, 25)

$Button10 = GUICtrlCreateButton("Button10", 100, 32, 75, 25)
$Button11 = GUICtrlCreateButton("Button11", 100, 64, 75, 25)
$Button12 = GUICtrlCreateButton("Button12", 100, 96, 75, 25)
$Button13 = GUICtrlCreateButton("Button13", 100, 128, 75, 25)

$Button14 = GUICtrlCreateButton("Button14", 200, 32, 75, 25)
$Button15 = GUICtrlCreateButton("Button15", 200, 64, 75, 25)
$Button16 = GUICtrlCreateButton("Button16", 200, 96, 75, 25)

$Button17 = GUICtrlCreateButton("Button17", 300, 32, 75, 25)
$Button18 = GUICtrlCreateButton("Button18", 300, 64, 75, 25)
$Button19 = GUICtrlCreateButton("Button19", 300, 96, 75, 25)

_AllHide()

GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            _AllHide()
            For $i = $Button10 To $Button13
                GUICtrlSetState($i, $GUI_SHOW)
            Next
        Case $Button2
            _AllHide()
            For $i = $Button14 To $Button16
                GUICtrlSetState($i, $GUI_SHOW)
            Next
        Case $Button3
            _AllHide()
            For $i = $Button17 To $Button19
                GUICtrlSetState($i, $GUI_SHOW)
            Next
    EndSwitch
WEnd

Func _AllHide()
    For $i = $Button10 To $Button19
        GUICtrlSetState($i, $GUI_HIDE)
    Next
EndFunc

M23

yes, with some corrections ..

At start of the script everything is OK - just what I need,

only if it is possible, first click on a button to show other vertically in a second click of a button ($ Button1) to hide button 10,11,12,13

Melba23 · November 7, 2010

HR78,

first click on a button to show other vertically in a second click of a button ($ Button1) to hide button 10,11,12,13

I hope I have understood that correctly: :graduated:

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

Global $Show_1 = False, $Show_2 = False, $Show_3 = False

$Form1 = GUICreate("Form1", 633, 447, 192, 124)

$Button1 = GUICtrlCreateButton("Button1", 0, 32, 75, 25)
$Button2 = GUICtrlCreateButton("Button2", 0, 64, 75, 25)
$Button3 = GUICtrlCreateButton("Button3", 0, 96, 75, 25)

$Button10 = GUICtrlCreateButton("Button10", 100, 32, 75, 25)
$Button11 = GUICtrlCreateButton("Button11", 100, 64, 75, 25)
$Button12 = GUICtrlCreateButton("Button12", 100, 96, 75, 25)
$Button13 = GUICtrlCreateButton("Button13", 100, 128, 75, 25)

$Button14 = GUICtrlCreateButton("Button14", 200, 32, 75, 25)
$Button15 = GUICtrlCreateButton("Button15", 200, 64, 75, 25)
$Button16 = GUICtrlCreateButton("Button16", 200, 96, 75, 25)

$Button17 = GUICtrlCreateButton("Button17", 300, 32, 75, 25)
$Button18 = GUICtrlCreateButton("Button18", 300, 64, 75, 25)
$Button19 = GUICtrlCreateButton("Button19", 300, 96, 75, 25)

_AllHide()

GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            _AllHide()
            If Not $Show_1 Then
                For $i = $Button10 To $Button13
                    GUICtrlSetState($i, $GUI_SHOW)
                Next
                $Show_1 = True
            Else
                $Show_1 = False
            EndIf
        Case $Button2
            _AllHide()
            If Not $Show_2 Then
                For $i = $Button14 To $Button16
                    GUICtrlSetState($i, $GUI_SHOW)
                Next
                $Show_2 = True
            Else
                $Show_2 = False
            EndIf
        Case $Button3
            _AllHide()
            If Not $Show_3 Then
                For $i = $Button17 To $Button19
                    GUICtrlSetState($i, $GUI_SHOW)
                Next
                $Show_3 = True
            Else
                $Show_3 = False
            EndIf
    EndSwitch
WEnd

Func _AllHide()
    For $i = $Button10 To $Button19
        GUICtrlSetState($i, $GUI_HIDE)
    Next
EndFunc

Are we there yet?

M23

HR78 · November 7, 2010

HR78,

I hope I have understood that correctly: :graduated:

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

Global $Show_1 = False, $Show_2 = False, $Show_3 = False

$Form1 = GUICreate("Form1", 633, 447, 192, 124)

$Button1 = GUICtrlCreateButton("Button1", 0, 32, 75, 25)
$Button2 = GUICtrlCreateButton("Button2", 0, 64, 75, 25)
$Button3 = GUICtrlCreateButton("Button3", 0, 96, 75, 25)

$Button10 = GUICtrlCreateButton("Button10", 100, 32, 75, 25)
$Button11 = GUICtrlCreateButton("Button11", 100, 64, 75, 25)
$Button12 = GUICtrlCreateButton("Button12", 100, 96, 75, 25)
$Button13 = GUICtrlCreateButton("Button13", 100, 128, 75, 25)

$Button14 = GUICtrlCreateButton("Button14", 200, 32, 75, 25)
$Button15 = GUICtrlCreateButton("Button15", 200, 64, 75, 25)
$Button16 = GUICtrlCreateButton("Button16", 200, 96, 75, 25)

$Button17 = GUICtrlCreateButton("Button17", 300, 32, 75, 25)
$Button18 = GUICtrlCreateButton("Button18", 300, 64, 75, 25)
$Button19 = GUICtrlCreateButton("Button19", 300, 96, 75, 25)

_AllHide()

GUISetState(@SW_SHOW)

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            _AllHide()
            If Not $Show_1 Then
                For $i = $Button10 To $Button13
                    GUICtrlSetState($i, $GUI_SHOW)
                Next
                $Show_1 = True
            Else
                $Show_1 = False
            EndIf
        Case $Button2
            _AllHide()
            If Not $Show_2 Then
                For $i = $Button14 To $Button16
                    GUICtrlSetState($i, $GUI_SHOW)
                Next
                $Show_2 = True
            Else
                $Show_2 = False
            EndIf
        Case $Button3
            _AllHide()
            If Not $Show_3 Then
                For $i = $Button17 To $Button19
                    GUICtrlSetState($i, $GUI_SHOW)
                Next
                $Show_3 = True
            Else
                $Show_3 = False
            EndIf
    EndSwitch
WEnd

Func _AllHide()
    For $i = $Button10 To $Button19
        GUICtrlSetState($i, $GUI_HIDE)
    Next
EndFunc

Are we there yet?

M23

yes, that's it

Thanks Man.

I I made a few attempts with your code:

#include <GUIConstantsEx.au3>

#include "GUIExtender.au3"

$hGUI = GUICreate("Test", 640, 480)


;$hGUI = GUICreate("Test", 80, 390)

_GUIExtender_Init($hGUI)

_GUIExtender_Section_Start(0, 60)
GUICtrlCreateGroup(" 1 - Static ", 10, 10, 80, 25)
_GUIExtender_Section_Action(2, "Group1", "Group1", 15, 40, 60, 20) ; Normal button
_GUIExtender_Section_End()

_GUIExtender_Section_Start(60, 110)
GUICtrlCreateGroup(" 2 - Extendable ", 10, 70, 80, 100)
GUICtrlCreateButton("Test 3", 15, 80, 60, 20)
GUICtrlCreateButton("Test 4", 15, 100, 60, 20)
GUICtrlCreateButton("Test 5", 15, 120, 60, 20)
GUICtrlCreateButton("Test 6", 15, 140, 60, 20)
GUICtrlCreateButton("Test 7", 15, 160, 60, 20)
GUICtrlCreateButton("Test 8", 15, 80, 60, 20)


_GUIExtender_Section_End()

_GUIExtender_Section_Start(170, 60)
GUICtrlCreateGroup(" 3 - Static", 10, 180, 80, 50)
_GUIExtender_Section_Action(4, "Group 2", "Group2", 15, 195, 60, 20, 1) ; Push button
_GUIExtender_Section_End()

_GUIExtender_Section_Start(215, 60)
GUICtrlCreateGroup(" 4 - Extendable ", 10, 240, 80, 50)
GUICtrlCreateButton("Test 9", 15, 250, 60, 20)
GUICtrlCreateButton("Test 10", 15, 270, 60, 20)
GUICtrlCreateButton("Test 11", 15, 290, 60, 20)
GUICtrlCreateButton("Test 12", 15, 310, 60, 20)
GUICtrlCreateButton("Test 13", 15, 330, 60, 20)
GUICtrlCreateButton("Test 14", 15, 350, 60, 20)
_GUIExtender_Section_End()



GUICtrlCreateGroup("", -99, -99, 1, 1)

_GUIExtender_Section_Extend(2, False)
_GUIExtender_Section_Extend(4, False)

GUISetState()

While 1
    $iMsg = GUIGetMsg()
    Switch $iMsg
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
    _GUIExtender_Action($iMsg) ; Check for click on Action control
WEnd

but I do not understand how to add Group 3,4,5

Edited November 7, 2010 by HR78

Melba23 · November 7, 2010

HR78,

Before I spend any more time on this let us get what you want quite clear.

I post a script using GUIExtender and you say "no, no" and post a script without the UDF.

I post a script not using GUIExtender and you say "yes, that's it" and then post a script using the UDF. :graduated:

Can I please have straight answer - do you want to use the GUIExtender UDF in your script or not? If you do, then please create the GUI as it would look fully extended and indicate which buttons should action which sections. I will then add the UDF lines for you.

All clear?

M23

Drop & Down Menu

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members