Jump to content

Problem with GUICtrlSetOnEvent


Recommended Posts

need little help from the expert, I don't know whats wrong with my script, only one button is working, button6.

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



SelectFolder()

While 1
    Sleep(10)
WEnd

Func SelectFolder()
    Opt("GUIOnEventMode", 1)
    If _Singleton("Uploader", 1) = 0 Then
        GUISetState(@SW_SHOW)
    Else
        GUICreate("Uploader", 208, 139, 211, 128, -1, $WS_EX_TOPMOST)
        GUISetOnEvent($GUI_EVENT_CLOSE, "CloseW")
        GUICtrlCreateButton("Load", 16, 16, 75, 25)
        GUICtrlCreateButton("TQEngFolder", 112, 16, 75, 25)
        GUICtrlCreateButton("Scanned", 16, 56, 75, 25)
        GUICtrlCreateButton("Incoming", 112, 56, 75, 25)
        GUICtrlCreateButton("Outgoing", 16, 96, 75, 25)
        GUICtrlCreateButton("Button6", 112, 96, 75, 25)
        GUICtrlSetOnEvent(-1, "Load")
        GUICtrlSetOnEvent(-1, "TQEngFolder")
        GUICtrlSetOnEvent(-1, "Scanned")
        GUICtrlSetOnEvent(-1, "Incoming")
        GUICtrlSetOnEvent(-1, "Outgoing")
        GUICtrlSetOnEvent(-1, "Button6")
        GUISetState(@SW_SHOW)
    EndIf
EndFunc   ;==>SelectFolder

Func CloseW()
    Select
        Case @GUI_CtrlId = $GUI_EVENT_CLOSE
            GUISetState(@SW_HIDE, "PDB")
    EndSelect
EndFunc   ;==>CloseW

Func Load()
    MsgBox(64, "Load", "You clickedLoad")
EndFunc   ;==>Load

Func TQEngFolder()
    MsgBox(64, "TQEngFolder", "You clicked TQFolder")
EndFunc   ;==>TQEngFolder

Func Scanned()
    MsgBox(64, "Scanned", "You clicked Scanned")
EndFunc   ;==>Scanned

Func Incoming()
    MsgBox(64, "Incoming", "You clicked Incoming")
EndFunc   ;==>Incoming

Func Outgoing()
    MsgBox(64, "Outgoing", "You clicked Outgoing")
EndFunc   ;==>Outgoing

Func Button6()
    MsgBox(64, "Availble", "You clicked button 6")
EndFunc   ;==>Button6

 

ill get to that... i still need to learn and understand a lot of codes graduated.gif

Correct answer, learn to walk before you take on that marathon.

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

×
×
  • Create New...