Encryption Posted February 12, 2005 Share Posted February 12, 2005 expandcollapse popup#include <GUIConstants.au3> #NoTrayIcon $createmain = GUICreate("Etc.", 500, 500) $filemenu = GUICtrlCreateMenu("File") $fileabout = GUICtrlCreateMenuItem("About", $filemenu) $fileclose = GUICtrlCreateMenuItem("Close", $filemenu) GUISetState() While 1 $msg = GUIGetMsg() If $msg = $fileabout Then AboutBox() EndIf If $msg = $fileclose Then GUIDelete($createmain) EndIf If $msg = $GUI_EVENT_CLOSE Then GUIDelete($createmain) EndIf WEnd Func AboutBox() $createabout = GUICreate("About Etc", 200, 200) $buttonOK = GUICtrlCreateButton("OK", 80, 160, 40, 30) $labelcredits = GUICtrlCreateLabel("Credits:", 80, 25) $labelmason = GUICtrlCreateLabel("Mason - Lead Scripter", 45, 45) $labeldavo = GUICtrlCreateLabel("Davo - Lead Scripter", 49, 65) GUISetState() While 1 $msgabout = GUIGetMsg() If $msgabout = $buttonOK Then GUIDelete($createabout) EndIf If $msgabout = $GUI_EVENT_CLOSE Then GUIDelete($createabout) EndIf WEnd EndFunc THe problem is when I get to the About box, once I click out of it, it won't let me press the "X" or the Close buttons on the normal window. What is the problem. Link to comment Share on other sites More sharing options...
CyberSlug Posted February 13, 2005 Share Posted February 13, 2005 Replace #NoTrayIcon with Opt("TrayIconDebug", 1), and you'll see that you never return from the "AboutBox" function!Replace the calls to GuiDelete($createbout) with Return GuiDelete($createbout) Use Mozilla | Take a look at My Disorganized AutoIt stuff | Very very old: AutoBuilder 11 Jan 2005 prototype I need to update my sig! Link to comment Share on other sites More sharing options...
Encryption Posted February 13, 2005 Author Share Posted February 13, 2005 Thanks once again. Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now