Reacción formulario al pulsar Enter
Publicado: 24 Ene 2011, 13:46
Buenas!!
El código que adjunto, es un formulario que tiene un input y un botón.
#include <GuiConstantsEx.au3>
GUICreate("GUI input", 200, 200)
$input = GUICtrlCreateInput("", 20, 50, 160)
$Boton = GUICtrlCreateButton("Seguir", 50, 140, 100)
GUISetState(@SW_SHOW)
$msg = 0
While $msg <> $GUI_EVENT_CLOSE
$msg = GUIGetMsg()
Select
Case $msg = $Boton
ExitLoop
EndSelect
WEnd
MsgBox(4096, "Información del input", GUICtrlRead($input))
Con el botón "Seguir" cerramos el formulario y muestra el valor $input.
Lo que quiero es que además de con el botón "Seguir" haga lo mismo al pulsar Enter.
Es decir, que al teclear un valor en el input y pulsar Enter, se comporte igual que si pulsáramos el botón "seguir".
No sé si me explico..
Muchas Gracias!!
El código que adjunto, es un formulario que tiene un input y un botón.
#include <GuiConstantsEx.au3>
GUICreate("GUI input", 200, 200)
$input = GUICtrlCreateInput("", 20, 50, 160)
$Boton = GUICtrlCreateButton("Seguir", 50, 140, 100)
GUISetState(@SW_SHOW)
$msg = 0
While $msg <> $GUI_EVENT_CLOSE
$msg = GUIGetMsg()
Select
Case $msg = $Boton
ExitLoop
EndSelect
WEnd
MsgBox(4096, "Información del input", GUICtrlRead($input))
Con el botón "Seguir" cerramos el formulario y muestra el valor $input.
Lo que quiero es que además de con el botón "Seguir" haga lo mismo al pulsar Enter.
Es decir, que al teclear un valor en el input y pulsar Enter, se comporte igual que si pulsáramos el botón "seguir".
No sé si me explico..
Muchas Gracias!!