Cerrar una aplicación usando sólo ESC
 

Hola

Quisiera saber como cerrar una aplicación usando sólo la tecla ESC.
Hice algunos intentos pero no funcionaron.

Gracias

Galbi.

Medio te respondo.

Coloca en tu forma principal o en la que
quieres que se cierra tu programa con esc.
si son en varias formas. que tener ese comportamiento.
coloca, un componente ActionList.
Haces doble click en este.
y en el cuadro que sale.
Agregas una caterogoria. Mejor dicho una accion.
por defecto es la primera llama Action1 y asi sucesivamente
la segunda llamada Action2 etc.

en el evento pones Close;

en las propiedades del control action list.
buscas ShortCut., en ese. elijes la shortcut. que quieres,.
no encontre la de esc. por eso te dijo que medio te respondo
yo eleji del y funciona
lo compilas y ya. usas dell o supr, o eliminar el boton y
se cierra tu programa

Otra es que hagas un hook a las teclas que se presionan
en torry.net recuerdo haber visto ejemplos de
como hacer hook, y en el hook. elijes el valor de la tecla esc.
VM_ESC creo. entonces cierras tu programa.

La otra posibilidad es habilitando en el formulario la opcion KeyPreview (dejarla como TRUE) y en el evento OnKeyPress poner el siguiente codigo

If Key=#27 then
close; //o se puede usar ModalResult := mrCancel
//si no te gusta el ruidito que sale cada vez q se preciona la tecla ESC
//agrega lo siguiente
Key := #0;

La forma más facil es que en tu formulario pongas un botón y en la propiedad OnClick pones el código para cerrar la forma, y en las propiedades del botón pon la propiedad "Cancel = True" eso hace que el OnClick de ese botón se llame al pulsar la tecla Esc

Saludos

Funcionó!
 

Gracias gente linda por tan rápidas y efectivas respuestas.
Todas funcionaron según lo indicado.

Galbi.

Ahi te va otra que puedes aplicar utilizando un objeto ActionList como te lo mencionaron previamente.

Creas tu sección en el objeto ActionList para que realice una acción.
Capturas la tecla con la que quieres que funcione.

y posteriormente aplicas esto en tu metodo.

Application.Terminate.

Ésto finalizará todo tu programa....
Bueno si quieres funalizarlo por completo.