Access Local Scope

[AndroidZero]

How I can access a Local Scope from outside
Is there a better way except creating Globals ?

 

#include <GUIConstants.au3>

#cs
Global $GUI_Window
Global $GUI_Label
#ce

Opt("GUIOnEventMode", 1)

Gui_P1()

While 1
    Sleep(100)
WEnd
Func Gui_P1()
     $GUI_Window = GUICreate("P1", 1050, 720, -1, -1)
     $GUI_Label = GUICtrlCreateLabel("<Nothing>", 25, 20)

    Local $GUI_Button = GUICtrlCreateButton("Modify",25,300,100)
    GUICtrlSetOnEvent($GUI_Button, "Modify")

    GUISetOnEvent($GUI_EVENT_CLOSE, "Gui_P1_Close")
    GUISetState(@SW_SHOW, $GUI_Window)
EndFunc

Func Gui_P1_Close()
    GUIDelete($GUI_Window)
    Exit
EndFunc

Func Modify()
    ConsoleWrite(@CRLF & ">Move")
    GUICtrlSetPos($GUI_Label, Random(25,250,1), Random(25,250,1))
    ConsoleWrite(@CRLF & ">Rewrite")
    GUICtrlSetData($GUI_Label,"Number: " & Random(0,99,1))
EndFunc

 

Edited April 18, 2019 by AndroidZero

[jdelaney]

Byref parameters or return from functions to variables and pass those to other functions.  or don't use local for variables needed globally

Edited April 18, 2019 by jdelaney

[BrewManNH]

The only way to access local is to pass them between the functions. If you're not calling the other function directly from within the first function, make the variables Global, that's the point of using Global variables, so they can be accessed anywhere in the script in any function. Also, if you're declaring them as Global, do not declare them inside the functions, declare them at the start of the script. Because you're using OnEvent mode, you could call one of the functions using the global before you called the function they might be declared in.

[Deye]

Yes, you can use nested\functions & parameters sent from your main loop 

Gui_P1_Close($GUI_Window)

Func Gui_P1_Close($hGUI_close = "")
    GUIDelete($hGUI_close)
    Exit
EndFunc   ;==>Gui_P1_Close

Modify($GUI_Label)

Func Modify($GUI_Label = "") 
    ConsoleWrite(@CRLF & ">Move")
    GUICtrlSetPos($GUI_Label, Random(25, 250, 1), Random(25, 250, 1))
    ConsoleWrite(@CRLF & ">Rewrite")
    GUICtrlSetData($GUI_Label, "Number: " & Random(0, 99, 1))
EndFunc   ;==>Modify

 

Edited April 18, 2019 by Deye

[BrewManNH]

4 minutes ago, Deye said:

Yes, you can use nested\functions & parameters sent from your main loop 

He's using OnEvent mode to call those functions, he'd have to rewrite the script to use MessageLoop mode, but it can be done.

[Deye]

1 hour ago, BrewManNH said:

He's using OnEvent mode

Oops, didn't notice that line

Then in that case :

1 hour ago, BrewManNH said:

make the variables Global, that's the point of using Global variables

Or use MessageLoop mode for more of other available options

Deye

 

Edited April 18, 2019 by Deye

[AndroidZero]

Ok I understand but my wish is to reduce the ammount of globals in my script to a minimum to avoid side effects and ress memory usage.
The thing with MessageLoops like GuiGetMsg() or TrayGetMsg() is that I can access the Local Scope BUT I can't go simultaneously into another MessageLoop.
That means I can't open another GUI or click in the TrayIcon.

Just to make it clear what my goal is:
I want to generate a TrayIcon with TrayMenus/items where I can open different GUIs or simply call functions but always being able to control the TrayIcon at any time and start further functions.
I extended the example script above with my needs using MessageLoops but how explained it doesn't work how I wish it should.
Any suggestion what is the best way to realize my plan ? Or is there no way to bypass declaring Globals ?

expandcollapse popup

#include <GUIConstants.au3>

#cs
Global $GUI_Window
Global $GUI_Label
#ce

;~ Opt("GUIOnEventMode", 1)
Opt("TrayMenuMode", 3)

Tray_T1()

Func Gui_P1()
    Local $GUI_Window = GUICreate("P1", 250, 250, -1, -1)
    Local $GUI_Label = GUICtrlCreateLabel("<Nothing>", 25, 20)
    Local $GUI_Button1 = GUICtrlCreateButton("Modify",0,175,250)
    Local $GUI_Button2 = GUICtrlCreateButton("Back",0,200,250)
    Local $GUI_Button3 = GUICtrlCreateButton("Exit",0,225,250)


    GUISetState(@SW_SHOW, $GUI_Window)

    While 1
        $idMsg = GUIGetMsg()
        Switch $idMsg
            Case $GUI_EVENT_CLOSE
                ConsoleWrite(@CRLF & ">$GUI_EVENT_CLOSE")
                Gui_Delete($GUI_Window)
                Tray_T1()
            Case $GUI_Button1
                ConsoleWrite(@CRLF & ">$GUI_Button1")
                Modify($GUI_Label)
            Case $GUI_Button2
                ConsoleWrite(@CRLF & ">$GUI_Button2")
                GUIDelete($GUI_Window)
                Tray_T1()
            Case $GUI_Button3
                ConsoleWrite(@CRLF & ">$GUI_Button3")
                Local $resp = MsgBox(262144 + 64 + 4, "Attention", "Do you really want to quit the whole program ?")
                If $resp == "1" Or $resp == "6" Or $resp == "11" Then
                    GUIDelete($GUI_Window)
                    Exit
                ElseIf $resp == "2" Or $resp == "3" Or $resp == "7" Then
                    ;Nothing
                EndIf
        EndSwitch
    WEnd
EndFunc
Func Gui_P2()
    Local $GUI_Window = GUICreate("P2", 250, 250, -1, -1)
    Local $GUI_Label = GUICtrlCreateLabel("<Nothing>", 25, 20)
    Local $GUI_Button1 = GUICtrlCreateButton("Modify",0,175,250)
    Local $GUI_Button2 = GUICtrlCreateButton("Back",0,200,250)
    Local $GUI_Button3 = GUICtrlCreateButton("Exit",0,225,250)


    GUISetState(@SW_SHOW, $GUI_Window)

    While 1
        $idMsg = GUIGetMsg()
        Switch $idMsg
            Case $GUI_EVENT_CLOSE
                ConsoleWrite(@CRLF & ">$GUI_EVENT_CLOSE")
                Gui_Delete($GUI_Window)
                Tray_T1()
            Case $GUI_Button1
                ConsoleWrite(@CRLF & ">$GUI_Button1")
                Modify($GUI_Label)
            Case $GUI_Button2
                ConsoleWrite(@CRLF & ">$GUI_Button2")
                GUIDelete($GUI_Window)
                Tray_T1()
            Case $GUI_Button3
                ConsoleWrite(@CRLF & ">$GUI_Button3")
                Local $resp = MsgBox(262144 + 64 + 4, "Attention", "Do you really want to quit the whole program ?")
                If $resp == "1" Or $resp == "6" Or $resp == "11" Then
                    GUIDelete($GUI_Window)
                    Exit
                ElseIf $resp == "2" Or $resp == "3" Or $resp == "7" Then
                    ;Nothing
                EndIf
        EndSwitch
    WEnd
EndFunc
Func Gui_Delete($gui)
    GUIDelete($gui)
EndFunc
Func Modify($control)
    ConsoleWrite(@CRLF & ">Move")
    GUICtrlSetPos($control, Random(0,200,1), Random(0,175,1))
    ConsoleWrite(@CRLF & ">Rewrite")
    GUICtrlSetData($control,"Number: " & Asc(Random(0,99,1)))
EndFunc

Func Tray_T1()
    $Tray_Item1 = TrayCreateItem("Gui_P1")
    $Tray_Item2 = TrayCreateItem("Gui_P2")
    $Tray_Item3 = TrayCreateItem("Exit")

    While 1
        Switch TrayGetMsg()
            Case $Tray_Item1
                ConsoleWrite(@CRLF & ">$Tray_Item1")
                TrayItemDelete($Tray_Item1)
                TrayItemDelete($Tray_Item2)
                TrayItemDelete($Tray_Item3)
                Gui_P1()
            Case $Tray_Item2
                ConsoleWrite(@CRLF & ">$Tray_Item2")
                TrayItemDelete($Tray_Item1)
                TrayItemDelete($Tray_Item2)
                TrayItemDelete($Tray_Item3)
                Gui_P2()
            Case $Tray_Item3
                ConsoleWrite(@CRLF & ">$Tray_Item3")
                Exit
        EndSwitch
    WEnd

EndFunc

 

Edited April 18, 2019 by AndroidZero

[RTFC]

example of multiple GUI handling

[BrewManNH]

15 minutes ago, AndroidZero said:

reduce the ammount of globals

Reduce by eliminating them all you mean? Use Globals where you need to use Globals, and don't use them if they're not actually used as global variables. In this case, the way it's written, you have to use globals. There's a reason why Global variables exist in every language, they're necessary.

[AndroidZero]

@BrewManNH okey you are right .. I just hoped for some magic trick
Well I read about functional programming time ago and how fancy it is without using globals just create Functions with 1 simple job and nest them inside each other to get your desired result like:

*PSEUDOCODE*

call OpenDoor(Move(LoadHand(LoadAvatar()),90°,45°,Down))

Thanks for all of your replies I will keep juggeling with my globals 🤹‍♂️