FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Cerrar fsMDIForm con ESC
Hola, podrian poner me pal de ejemplo de como cerrar formularios al presionar la tecla escape creia que era de esta forma pero no funciono:
if key=vk_esc then begin close(); end |
#2
|
||||
|
||||
Hola, se me ocurre que deberías usar un ActionList en el formulario principal y programar el código, otra cosa, ¿qué versión Delphi estás trabajando?.
Saludos.
__________________
Mi BLOG - ¡Joder, leanse la guia de estilo! Las Palabras son enanas, los ejemplos gigantes. |
#3
|
||||
|
||||
tu formulio debe de tener la propiedad "KeyPreview" en verdadero, ese código debe de estar en el evento "OnKeyPress" del formulario.
Lo más fácil es utilizar un ActionList y a la acción cerrar ponerle el acceso directo (ShortCut) a la tecla "Esc". Al botón de salir le asignas esa acción y listo. No codifícas nada.
__________________
|
#4
|
|||
|
|||
Cerrar form al presionar Esc (SOLUCIONADO)
Gracias a todos: para los que tienen el mismo problema esta es la "solucion".
ponerlo en el evento onkeypress poner la propiedad keypreview a true de cada form que se cerrara al precionar la tecla Esc. Codigo el correcto es: procedure TF_Usuarios.FormKeyPress(Sender: TObject; var Key: Char); begin if key = #27 then begin close; end end; Hasta la proxima! |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Crear un form fsMDIForm y varios forms hijos | citlalliDgp | Varios | 11 | 07-12-2007 15:13:31 |
Cerrar conexión al cerrar formulario | arantzal | Conexión con bases de datos | 5 | 09-08-2006 12:43:52 |
formStyle=fsMDIForm, formStyle=fsMDIChild == "Abstract Error" | Essato | Varios | 16 | 15-06-2005 19:55:34 |
OnKeyPress y fsMDIForm = LOCO!!! | nicolasdom | Varios | 11 | 09-10-2004 16:32:55 |
Imagen de fondo en un FsMDIForm | ing_alsaac | Varios | 1 | 27-05-2003 18:26:59 |
|