How Do I Close A Window When Hitting Enter?

[slightly_abnormal]

I'm making a window, when i hit enter it will close, right now the hotkey is not working because it is globably and it just doesn't work like it should, hitting enter while the window "about" window is active should close it.., if the window is not active then ignore you know like most windows with the okay, or done button..

#include <GUIConstants.au3>
$Form2 = GUICreate("About", 323, 239, 302, 218)
GUISetIcon("D:\006.ico")
$co = GUICtrlCreateGroup("", 8, 8, 305, 185)
$cd = GUICtrlCreatePic("", 16, 24, 105, 97)
GUICtrlCreateLabel("Product Name", 152, 24, 72, 17)
GUICtrlCreateLabel("Version", 152, 48, 39, 17)
GUICtrlCreateLabel("Copyright", 16, 136, 48, 17)
GUICtrlCreateLabel("Comments", 16, 160, 53, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$bt = GUICtrlCreateButton("&OK", 112, 208, 75, 25)
GUISetState(@SW_SHOW)
hotkeyset("{enter}", "_x")

While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case $msg =  $bt 
    exit
;;;;;;;
    EndSelect
WEnd
Exit

Func _kill()
    Exit 0
EndFunc

Func _x()
Exit
EndFunc

Edited March 24, 2006 by slightly_abnormal

[SmOke_N]

I'm making a window, when i hit enter it will close, right now the hotkey is not working because it is globably and it just doesn't work like it should, hitting enter while the window "about" window is active should close it.., if the window is not active then ignore you know like most windows with the okay, or done button..

#include <GUIConstants.au3>
$Form2 = GUICreate("About", 323, 239, 302, 218)
GUISetIcon("D:\006.ico")
$co = GUICtrlCreateGroup("", 8, 8, 305, 185)
$cd = GUICtrlCreatePic("", 16, 24, 105, 97)
GUICtrlCreateLabel("Product Name", 152, 24, 72, 17)
GUICtrlCreateLabel("Version", 152, 48, 39, 17)
GUICtrlCreateLabel("Copyright", 16, 136, 48, 17)
GUICtrlCreateLabel("Comments", 16, 160, 53, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$bt = GUICtrlCreateButton("&OK", 112, 208, 75, 25)
GUISetState(@SW_SHOW)
hotkeyset("{enter}", "_x")

While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case $msg =  $bt 
    exit
;;;;;;;
    EndSelect
WEnd
Exit

Func _kill()
    Exit 0
EndFunc

Func _x()
Exit
EndFunc

You pretty much answered your own question didn't you?

Func _x()
If WinActive($Form2) Then Exit
EndFunc

Edited March 24, 2006 by SmOke_N

[slightly_abnormal]

You pretty much answered your own question didn't you?

Func _x()

If WinActive($Form2) Then Exit
EndFunc

Man.. i tried nearly everything, i tried that but it disables enter when a different window is active..

[slightly_abnormal]

Man.. i tried nearly everything, i tried that but it disables enter when a different window is active..

maybe a simple way would be giving the "okay" button focus.. but how?

[SmOke_N]

You could always reset the hotkey

expandcollapse popup

#include <GUIConstants.au3>
$Form2 = GUICreate("About", 323, 239, 302, 218)
GUISetIcon("D:\006.ico")
$co = GUICtrlCreateGroup("", 8, 8, 305, 185)
$cd = GUICtrlCreatePic("", 16, 24, 105, 97)
GUICtrlCreateLabel("Product Name", 152, 24, 72, 17)
GUICtrlCreateLabel("Version", 152, 48, 39, 17)
GUICtrlCreateLabel("Copyright", 16, 136, 48, 17)
GUICtrlCreateLabel("Comments", 16, 160, 53, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$bt = GUICtrlCreateButton("&OK", 112, 208, 75, 25)
GUISetState(@SW_SHOW)
HotKeySet('{ENTER}', "_x")

While 1
    $msg = GuiGetMsg()
    Select
    Case $msg = $GUI_EVENT_CLOSE
        ExitLoop
    Case $msg =  $bt
    exit
;;;;;;;
    EndSelect
WEnd
Exit

Func _kill()
    Exit 0
EndFunc


Func _x()
    If BitAND(WinGetState($Form2), 8) Then 
        Exit
    Else
        HotKeySet('{ENTER}')
        Send('{ENTER}')
        HotKeySet('{ENTER}', "_x")
    EndIf
EndFunc

[slightly_abnormal]

this is much better! thanks smoke_n once again.