Jump to content

Two Gui


Recommended Posts

  • Moderators

dromenox,

You might find the Managing Multiple GUIs tutorial in the Wiki useful. ;)

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to comment
Share on other sites

  • Moderators

dromenox,

One way to do it: ;)

#include <GUIConstantsEx.au3>
#include <MsgBoxConstants.au3>

$hGUI_1 = GUICreate("Test 1", 500, 500)
$cButton = GUICtrlCreateButton("GUI 2", 10, 10, 80, 30)
GUISetState(@SW_SHOW, $hGUI_1)

$hGUI_2 = GUICreate("Test 2", 300, 300)
GUISetState(@SW_HIDE, $hGUI_2)

While 1

    $aMsg = GUIGetMsg(1)
    Switch $aMsg[1]
        Case $hGUI_1
            Switch $aMsg[0]
                Case $GUI_EVENT_CLOSE
                    Exit
                Case $cButton
                    GUIDelete($hGUI_1)
                    GUISetState(@SW_SHOW, $hGUI_2)
                    WinActivate($hGUI_2)
            EndSwitch
        Case $hGUI_2
            Switch $aMsg[0]
                Case $GUI_EVENT_CLOSE
                    Exit
            EndSwitch
    EndSwitch

WEnd
As always, please ask if you have any questions. :)

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to comment
Share on other sites

The above example is too easy but if you feel it difficult.....try this one.

#include <GUIConstants.au3>
_main()
_main2()
Func _main()
    Local $gui, $ntm, $msg
    $gui = GUICreate("1st GUI")
    $btn = GUICtrlCreateButton(" Button ", 50, 50, 50, 30)
    GUISetState(@SW_SHOW)

    While 1
        $msg = GUIGetMsg()
        Switch $msg
            Case $GUI_EVENT_CLOSE
                ToolTip("Closing...")
            Case $btn
                ExitLoop
        EndSwitch
    WEnd
    GUIDelete($gui)
    Return ""
EndFunc   ;==>_main
Func _main2()
    Local $gui, $ntm, $msg
    $gui = GUICreate("2nd GUI")
    $btn = GUICtrlCreateButton(" Button ", 50, 50, 50, 30)
    GUISetState(@SW_SHOW)

    While 1
        $msg = GUIGetMsg()
        Switch $msg
            Case $GUI_EVENT_CLOSE
                Exit
            Case $btn
                MsgBox(64, "", "Button clicked", "", $gui)
        EndSwitch
    WEnd
EndFunc   ;==>_main2
Link to comment
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...