Jump to content

Recommended Posts

Posted

#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.

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
  • Recently Browsing   0 members

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