Managing Multiple GUIs - Revision history

MLipok: OnEvent Mode: Case $GUI_EVENT_NONE ; it will not be necessary as we already check: If Not IsHWnd($aMsg[1]) Then

2021-09-19T21:20:59Z

OnEvent Mode: Case $GUI_EVENT_NONE ; it will not be necessary as we already check: If Not IsHWnd($aMsg[1]) Then

← Older revision		Revision as of 21:20, 19 September 2021
Line 119:		Line 119:
	Case $hGUI1		Case $hGUI1
	Switch $aMsg[0] ; Now check for the messages sent from $hGUI1		Switch $aMsg[0] ; Now check for the messages sent from $hGUI1
	Case $GUI_EVENT_NONE		Case $GUI_EVENT_NONE ; it will not be necessary as we already check: If Not IsHWnd($aMsg[1]) Then
	ContinueLoop		ContinueLoop
	Case $GUI_EVENT_CLOSE		Case $GUI_EVENT_CLOSE
Line 128:		Line 128:
	Case $hGUI2		Case $hGUI2
	Switch $aMsg[0] ; Now check for the messages sent from $hGUI2		Switch $aMsg[0] ; Now check for the messages sent from $hGUI2
	Case $GUI_EVENT_NONE		Case $GUI_EVENT_NONE ; it will not be necessary as we already check: If Not IsHWnd($aMsg[1]) Then
	ContinueLoop		ContinueLoop
	Case $GUI_EVENT_CLOSE		Case $GUI_EVENT_CLOSE
Line 155:		Line 155:
	$aMsg = GUIGetMsg(1) ; Use advanced parameter to get array		$aMsg = GUIGetMsg(1) ; Use advanced parameter to get array
	If Not IsHWnd($aMsg[1]) Then ContinueLoop ; preventing subsequent lines from processing when nothing happens		If Not IsHWnd($aMsg[1]) Then ContinueLoop ; preventing subsequent lines from processing when nothing happens

	Switch $aMsg[1] ; check which GUI sent the message		Switch $aMsg[1] ; check which GUI sent the message
	Case $g_hGUI1		Case $g_hGUI1
	Switch $aMsg[0] ; Now check for the messages for $g_hGUI1		Switch $aMsg[0] ; Now check for the messages for $g_hGUI1
	~~Case $GUI_EVENT_NONE~~		Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI: $g_hGUI1 ...
	~~ContinueLoop~~		ExitLoop ; ... exit the loop and thus exit the program
	Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI ~~- we exit <<<<<<<<<<<<<<<~~
	ExitLoop
	Case $g_idButton1		Case $g_idButton1
	MsgBox($MB_OK, "MsgBox 1", "Test from GUI 1")		MsgBox($MB_OK, "MsgBox 1", "Test from GUI 1")
Line 171:		Line 169:
	Case $g_hGUI2		Case $g_hGUI2
	Switch $aMsg[0] ; Now check for the messages for $g_hGUI2		Switch $aMsg[0] ; Now check for the messages for $g_hGUI2
	~~Case $GUI_EVENT_NONE~~		Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI : $g_hGUI2 ...
	~~ContinueLoop~~		GUIDelete($g_hGUI2) ; ... just delete the GUI ...
	Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI ~~- we just delete the GUI <<<<<<<<<<<<<<<~~		GUICtrlSetState($g_idButton2, $GUI_ENABLE) ; ... enable button (previously disabled)
	GUIDelete($g_hGUI2)
	GUICtrlSetState($g_idButton2, $GUI_ENABLE)
	Case $g_idButton3		Case $g_idButton3
	MsgBox($MB_OK, "MsgBox", "Test from GUI 2")		MsgBox($MB_OK, "MsgBox", "Test from GUI 2")

MLipok at 15:01, 19 September 2021

2021-09-19T15:01:28Z

← Older revision		Revision as of 15:01, 19 September 2021
Line 160:		Line 160:
	Switch $aMsg[0] ; Now check for the messages for $g_hGUI1		Switch $aMsg[0] ; Now check for the messages for $g_hGUI1
	Case $GUI_EVENT_NONE		Case $GUI_EVENT_NONE
	ContinueLoop ~~; preventing subsequent lines from processing when nothing happens~~		ContinueLoop
	Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we exit <<<<<<<<<<<<<<<		Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we exit <<<<<<<<<<<<<<<
	ExitLoop		ExitLoop

MLipok: CLEANUP comments

2021-09-19T15:00:33Z

CLEANUP comments

← Older revision		Revision as of 15:00, 19 September 2021
Line 22:		Line 22:
	Switch GUIGetMsg()		Switch GUIGetMsg()
	Case $GUI_EVENT_NONE		Case $GUI_EVENT_NONE
	ContinueLoop ~~; or do nothing~~		ContinueLoop
	Case $GUI_EVENT_CLOSE		Case $GUI_EVENT_CLOSE
	ExitLoop		ExitLoop
Line 61:		Line 61:
	Switch GUIGetMsg()		Switch GUIGetMsg()
	Case $GUI_EVENT_NONE		Case $GUI_EVENT_NONE
	ContinueLoop ~~; or do nothing~~		ContinueLoop
	Case $GUI_EVENT_CLOSE		Case $GUI_EVENT_CLOSE
	ExitLoop		ExitLoop
Line 85:		Line 85:
	Switch GUIGetMsg()		Switch GUIGetMsg()
	Case $GUI_EVENT_NONE		Case $GUI_EVENT_NONE
	ContinueLoop ~~; or do nothing~~		ContinueLoop
	Case $GUI_EVENT_CLOSE		Case $GUI_EVENT_CLOSE
	GUIDelete($hGUI2)		GUIDelete($hGUI2)
Line 103:		Line 103:
	Switch GUIGetMsg()		Switch GUIGetMsg()
	Case $GUI_EVENT_NONE		Case $GUI_EVENT_NONE
	ContinueLoop ~~; or do nothing~~		ContinueLoop
	Case $GUI_EVENT_CLOSE		Case $GUI_EVENT_CLOSE
	; Code		; Code
Line 120:		Line 120:
	Switch $aMsg[0] ; Now check for the messages sent from $hGUI1		Switch $aMsg[0] ; Now check for the messages sent from $hGUI1
	Case $GUI_EVENT_NONE		Case $GUI_EVENT_NONE
	ContinueLoop ~~; or do nothing~~		ContinueLoop
	Case $GUI_EVENT_CLOSE		Case $GUI_EVENT_CLOSE
	; Code		; Code
Line 129:		Line 129:
	Switch $aMsg[0] ; Now check for the messages sent from $hGUI2		Switch $aMsg[0] ; Now check for the messages sent from $hGUI2
	Case $GUI_EVENT_NONE		Case $GUI_EVENT_NONE
	ContinueLoop ~~; or do nothing~~		ContinueLoop
	Case $GUI_EVENT_CLOSE		Case $GUI_EVENT_CLOSE
	; Code		; Code
Line 160:		Line 160:
	Switch $aMsg[0] ; Now check for the messages for $g_hGUI1		Switch $aMsg[0] ; Now check for the messages for $g_hGUI1
	Case $GUI_EVENT_NONE		Case $GUI_EVENT_NONE
	ContinueLoop ; ~~or do~~ nothing		ContinueLoop ; preventing subsequent lines from processing when nothing happens
	Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we exit <<<<<<<<<<<<<<<		Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we exit <<<<<<<<<<<<<<<
	ExitLoop		ExitLoop
Line 172:		Line 172:
	Switch $aMsg[0] ; Now check for the messages for $g_hGUI2		Switch $aMsg[0] ; Now check for the messages for $g_hGUI2
	Case $GUI_EVENT_NONE		Case $GUI_EVENT_NONE
	ContinueLoop ~~; or do nothing~~		ContinueLoop
	Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we just delete the GUI <<<<<<<<<<<<<<<		Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we just delete the GUI <<<<<<<<<<<<<<<
	GUIDelete($g_hGUI2)		GUIDelete($g_hGUI2)

MLipok: If Not IsHWnd($aMsg[1]) for preventing subsequent lines from processing when nothing happens

2021-09-19T14:50:57Z

If Not IsHWnd($aMsg[1]) for preventing subsequent lines from processing when nothing happens

Show changes

MLipok: added Case $GUI_EVENT_NONE to prevent declaring Button = 9999

2021-09-19T14:34:01Z

added Case $GUI_EVENT_NONE to prevent declaring Button = 9999

← Older revision		Revision as of 14:34, 19 September 2021
Line 9:		Line 9:
	#include <MsgBoxConstants.au3>		#include <MsgBoxConstants.au3>

	Global $g_idButton3 ~~= 9999~~		Global $g_idButton3

	gui1()		gui1()
Line 21:		Line 21:
	While 1		While 1
	Switch GUIGetMsg()		Switch GUIGetMsg()
			Case $GUI_EVENT_NONE
			ContinueLoop ; or do nothing
	Case $GUI_EVENT_CLOSE		Case $GUI_EVENT_CLOSE
	ExitLoop		ExitLoop
Line 58:		Line 60:
	While 1		While 1
	Switch GUIGetMsg()		Switch GUIGetMsg()
			Case $GUI_EVENT_NONE
			ContinueLoop ; or do nothing
	Case $GUI_EVENT_CLOSE		Case $GUI_EVENT_CLOSE
	ExitLoop		ExitLoop
Line 80:		Line 84:
	; We can only get messages from the second GUI		; We can only get messages from the second GUI
	Switch GUIGetMsg()		Switch GUIGetMsg()
			Case $GUI_EVENT_NONE
			ContinueLoop ; or do nothing
	Case $GUI_EVENT_CLOSE		Case $GUI_EVENT_CLOSE
	GUIDelete($hGUI2)		GUIDelete($hGUI2)
Line 96:		Line 102:
	<syntaxhighlight lang="autoit">		<syntaxhighlight lang="autoit">
	Switch GUIGetMsg()		Switch GUIGetMsg()
			Case $GUI_EVENT_NONE
			ContinueLoop ; or do nothing
	Case $GUI_EVENT_CLOSE		Case $GUI_EVENT_CLOSE
	; Code		; Code
Line 110:		Line 118:
	Case $hGUI1		Case $hGUI1
	Switch $aMsg[0] ; Now check for the messages sent from $hGUI1		Switch $aMsg[0] ; Now check for the messages sent from $hGUI1
			Case $GUI_EVENT_NONE
			ContinueLoop ; or do nothing
	Case $GUI_EVENT_CLOSE		Case $GUI_EVENT_CLOSE
	; Code		; Code
Line 117:		Line 127:
	Case $hGUI2		Case $hGUI2
	Switch $aMsg[0] ; Now check for the messages sent from $hGUI2		Switch $aMsg[0] ; Now check for the messages sent from $hGUI2
			Case $GUI_EVENT_NONE
			ContinueLoop ; or do nothing
	Case $GUI_EVENT_CLOSE		Case $GUI_EVENT_CLOSE
	; Code		; Code
Line 131:		Line 143:
	#include <MsgBoxConstants.au3>		#include <MsgBoxConstants.au3>

	Global $g_hGUI1 = 9999, $g_idButton1 ~~= 9999~~, $g_idButton2 ~~= 9999~~, $g_hGUI2 = 9999, $g_idButton3 ~~= 9999~~ ; Predeclare the variables with dummy values to prevent firing the Case statements, only for GUI this time		Global $g_hGUI1 = 9999, $g_idButton1, $g_idButton2, $g_hGUI2 = 9999, $g_idButton3 ; Predeclare the variables with dummy values to prevent firing the Case statements, only for GUI this time

	example()		example()
Line 144:		Line 156:
	Case $g_hGUI1		Case $g_hGUI1
	Switch $aMsg[0] ; Now check for the messages for $g_hGUI1		Switch $aMsg[0] ; Now check for the messages for $g_hGUI1
			Case $GUI_EVENT_NONE
			ContinueLoop ; or do nothing
	Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we exit <<<<<<<<<<<<<<<		Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we exit <<<<<<<<<<<<<<<
	ExitLoop		ExitLoop
Line 154:		Line 168:
	Case $g_hGUI2		Case $g_hGUI2
	Switch $aMsg[0] ; Now check for the messages for $g_hGUI2		Switch $aMsg[0] ; Now check for the messages for $g_hGUI2
			Case $GUI_EVENT_NONE
			ContinueLoop ; or do nothing
	Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we just delete the GUI <<<<<<<<<<<<<<<		Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we just delete the GUI <<<<<<<<<<<<<<<
	GUIDelete($g_hGUI2)		GUIDelete($g_hGUI2)
Line 190:		Line 206:
	Opt("GUIOnEventMode", 1)		Opt("GUIOnEventMode", 1)

	Global $g_hGUI2 = 9999, $g_idButton2 ~~= 9999~~ ; Predeclare these variables		Global $g_hGUI2 = 9999, $g_idButton2 ; Predeclare these variables

	gui1()		gui1()
Line 245:		Line 261:
	Opt("GUIOnEventMode", 1)		Opt("GUIOnEventMode", 1)

	Global $g_hGUI1, $g_hGUI2 = 9999, $g_idButton1, $g_idButton2, $g_idButton3 ~~= 9999~~ ; Predeclare the variables with dummy values to prevent firing the Case statements		Global $g_hGUI1, $g_hGUI2 = 9999, $g_idButton1, $g_idButton2, $g_idButton3 ; Predeclare the variables with dummy values to prevent firing the Case statements

	gui1()		gui1()

MLipok: /* MessageLoop Mode */ better advance example

2021-09-18T22:12:04Z

MessageLoop Mode: better advance example

← Older revision		Revision as of 22:12, 18 September 2021
Line 131:		Line 131:
	#include <MsgBoxConstants.au3>		#include <MsgBoxConstants.au3>

	Global $g_hGUI2 = 9999, $g_idButton3 ; Predeclare the variables with dummy values to prevent firing the Case statements, only for GUI this time		Global $g_hGUI1 = 9999, $g_idButton1 = 9999, $g_idButton2 = 9999, $g_hGUI2 = 9999, $g_idButton3 = 9999 ; Predeclare the variables with dummy values to prevent firing the Case statements, only for GUI this time

	~~gui1~~()		example()

	Func ~~gui1~~()		Func example()
	~~Local $hGUI1 = GUICreate("Gui 1", 200, 200, 100, 100)~~		gui1()
	~~Local $idButton1 = GUICtrlCreateButton~~(~~"Msgbox 1", 10, 10, 80, 30~~)		Local $aMsg
	Local $~~idButton2 = GUICtrlCreateButton("Show Gui 2", 10, 60, 80, 30)~~
	~~GUISetState()~~

	~~Local $aMsg~~
	While 1		While 1
	$aMsg = GUIGetMsg(1) ; Use advanced parameter to get array		$aMsg = GUIGetMsg(1) ; Use advanced parameter to get array
	Switch $aMsg[1] ; check which GUI sent the message		Switch $aMsg[1] ; check which GUI sent the message
	Case $~~hGUI1~~		Case $g_hGUI1
	Switch $aMsg[0] ; Now check for the messages for $~~hGUI1~~		Switch $aMsg[0] ; Now check for the messages for $g_hGUI1
	Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we exit <<<<<<<<<<<<<<<		Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we exit <<<<<<<<<<<<<<<
	ExitLoop		ExitLoop
	Case $~~idButton1~~		Case $g_idButton1
	MsgBox($MB_OK, "MsgBox 1", "Test from Gui 1")		MsgBox($MB_OK, "MsgBox 1", "Test from Gui 1")
	Case $~~idButton2~~		Case $g_idButton2
	GUICtrlSetState($~~idButton2~~, $GUI_DISABLE)		GUICtrlSetState($g_idButton2, $GUI_DISABLE)
	gui2()		gui2()
	EndSwitch		EndSwitch
Line 159:		Line 156:
	Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we just delete the GUI <<<<<<<<<<<<<<<		Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we just delete the GUI <<<<<<<<<<<<<<<
	GUIDelete($g_hGUI2)		GUIDelete($g_hGUI2)
	GUICtrlSetState($~~idButton2~~, $GUI_ENABLE)		GUICtrlSetState($g_idButton2, $GUI_ENABLE)
	Case $g_idButton3		Case $g_idButton3
	MsgBox($MB_OK, "MsgBox", "Test from Gui 2")		MsgBox($MB_OK, "MsgBox", "Test from Gui 2")
Line 165:		Line 162:
	EndSwitch		EndSwitch
	WEnd		WEnd

			EndFunc ;==>example

			Func gui1()
			$g_hGUI1 = GUICreate("Gui 1", 200, 200, 100, 100)
			$g_idButton1 = GUICtrlCreateButton("Msgbox 1", 10, 10, 80, 30)
			$g_idButton2 = GUICtrlCreateButton("Show Gui 2", 10, 60, 80, 30)
			GUISetState()
	EndFunc ;==>gui1		EndFunc ;==>gui1

	Func gui2()		Func gui2()
	$g_hGUI2 = GUICreate("Gui 2", 200, 200, 350, 350)		$g_hGUI2 = GUICreate("Gui 2", 200, 200, 350, 350)
	~~Local~~ $g_idButton3 = GUICtrlCreateButton("MsgBox 2", 10, 10, 80, 30)		$g_idButton3 = GUICtrlCreateButton("MsgBox 2", 10, 10, 80, 30)
	GUISetState()		GUISetState()
	EndFunc ;==>gui2		EndFunc ;==>gui2

MLipok: /* MessageLoop Mode */ example - #forceref removal/refactoring

2021-09-18T22:03:20Z

MessageLoop Mode: example - #forceref removal/refactoring

← Older revision		Revision as of 22:03, 18 September 2021
Line 15:		Line 15:
	Func gui1()		Func gui1()
	Local $hGUI1 = GUICreate("Gui 1", 200, 200, 100, 100)		Local $hGUI1 = GUICreate("Gui 1", 200, 200, 100, 100)
	~~#forceref $hGUI1~~
	Local $idButton1 = GUICtrlCreateButton("Msgbox 1", 10, 10, 80, 30)		Local $idButton1 = GUICtrlCreateButton("Msgbox 1", 10, 10, 80, 30)
	Local $idButton2 = GUICtrlCreateButton("Show Gui 2", 10, 60, 80, 30)		Local $idButton2 = GUICtrlCreateButton("Show Gui 2", 10, 60, 80, 30)
	GUISetState()		GUISetState(@SW_SHOW, $hGUI1)

	While 1		While 1
Line 37:		Line 36:
	Func gui2()		Func gui2()
	Local $hGUI2 = GUICreate("Gui 2", 200, 200, 350, 350)		Local $hGUI2 = GUICreate("Gui 2", 200, 200, 350, 350)
	~~#forceref $hGUI2~~
	$g_idButton3 = GUICtrlCreateButton("MsgBox 2", 10, 10, 80, 30)		$g_idButton3 = GUICtrlCreateButton("MsgBox 2", 10, 10, 80, 30)
	GUISetState()		GUISetState(@SW_SHOW, $hGUI2)
	EndFunc ;==>gui2		EndFunc ;==>gui2
	</syntaxhighlight>		</syntaxhighlight>

MLipok: /* OnEvent Mode */ fix the code with Global/Local

2021-09-18T22:01:12Z

OnEvent Mode: fix the code with Global/Local

← Older revision		Revision as of 22:01, 18 September 2021
Line 187:		Line 187:
	Opt("GUIOnEventMode", 1)		Opt("GUIOnEventMode", 1)

	Global $g_hGUI2, $g_idButton2 ; Predeclare these variables		Global $g_hGUI2 = 9999, $g_idButton2 = 9999 ; Predeclare these variables

	gui1()		gui1()
Line 195:		Line 195:
	GUISetOnEvent($GUI_EVENT_CLOSE, "On_Close_Main") ; Run this function when the main GUI [X] is clicked		GUISetOnEvent($GUI_EVENT_CLOSE, "On_Close_Main") ; Run this function when the main GUI [X] is clicked
	Local $idButton1 = GUICtrlCreateButton("Msgbox 1", 10, 10, 80, 30)		Local $idButton1 = GUICtrlCreateButton("Msgbox 1", 10, 10, 80, 30)
	GUICtrlSetOnEvent(-1, "On_Button1")		GUICtrlSetOnEvent($idButton1, "On_Button1")
	~~Local~~ $g_idButton2 = GUICtrlCreateButton("Show Gui 2", 10, 60, 80, 30)		$g_idButton2 = GUICtrlCreateButton("Show Gui 2", 10, 60, 80, 30)
	GUICtrlSetOnEvent(-1, "On_Button2")		GUICtrlSetOnEvent(-1, "On_Button2")
	GUISetState()		GUISetState(@SW_SHOW, $hGUI1)

	While 1		While 1
Line 206:		Line 206:

	Func gui2()		Func gui2()
	~~Local~~ $g_hGUI2 = GUICreate("Gui 2", 200, 200, 350, 350)		$g_hGUI2 = GUICreate("Gui 2", 200, 200, 350, 350)
	GUISetOnEvent($GUI_EVENT_CLOSE, "On_Close_Secondary") ; Run this function when the secondary GUI [X] is clicked		GUISetOnEvent($GUI_EVENT_CLOSE, "On_Close_Secondary") ; Run this function when the secondary GUI [X] is clicked
	Local $idButton3 = GUICtrlCreateButton("MsgBox 2", 10, 10, 80, 30)		Local $idButton3 = GUICtrlCreateButton("MsgBox 2", 10, 10, 80, 30)
	GUICtrlSetOnEvent(-1, "On_Button3")		GUICtrlSetOnEvent($idButton3, "On_Button3")
	GUISetState()		GUISetState(@SW_SHOW, $g_hGUI2)
	EndFunc ;==>gui2		EndFunc ;==>gui2

MLipok: fixed Local <> Global

2021-09-18T15:36:55Z

fixed Local <> Global

← Older revision		Revision as of 15:36, 18 September 2021
Line 15:		Line 15:
	Func gui1()		Func gui1()
	Local $hGUI1 = GUICreate("Gui 1", 200, 200, 100, 100)		Local $hGUI1 = GUICreate("Gui 1", 200, 200, 100, 100)
			#forceref $hGUI1
	Local $idButton1 = GUICtrlCreateButton("Msgbox 1", 10, 10, 80, 30)		Local $idButton1 = GUICtrlCreateButton("Msgbox 1", 10, 10, 80, 30)
	Local $idButton2 = GUICtrlCreateButton("Show Gui 2", 10, 60, 80, 30)		Local $idButton2 = GUICtrlCreateButton("Show Gui 2", 10, 60, 80, 30)
Line 36:		Line 37:
	Func gui2()		Func gui2()
	Local $hGUI2 = GUICreate("Gui 2", 200, 200, 350, 350)		Local $hGUI2 = GUICreate("Gui 2", 200, 200, 350, 350)
	~~Local~~ $g_idButton3 = GUICtrlCreateButton("MsgBox 2", 10, 10, 80, 30)		#forceref $hGUI2
			$g_idButton3 = GUICtrlCreateButton("MsgBox 2", 10, 10, 80, 30)
	GUISetState()		GUISetState()
	EndFunc ;==>gui2		EndFunc ;==>gui2

MLipok: MsgBox("" >> MsgBox($MB_OK and few next local/global declarations

2017-04-16T19:14:26Z

MsgBox("" >> MsgBox($MB_OK and few next local/global declarations

Show changes