Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   cerrar automáticamente (https://www.clubdelphi.com/foros/showthread.php?t=27650)

emiliu 27-11-2005 16:07:57

cerrar automáticamente
 
Hola, necesito saber como configurar un timer, para decirle que si el usuario no ha pulsado ninguna tecla del teclado en x segundos, se cierre automaticamente el programa, me podeis ayudar?? :rolleyes:
gracias :)

Héctor Randolph 27-11-2005 16:21:37

A grandes rasgos es algo como esto
  • En el evento OnCreate del Form configura el timer con los x milisegundos
  • Coloca en True la propiedad KeyPreview del Form.
  • En el evento OnKeyDown del Form reinicia el timer de esta forma
    Código Delphi [-]
      Timer1.Enabled:=False;
      Timer1.Enabled:=True;
  • En el Evento OnTimer desactivas el timer y cierras la Forma.

Es lo primero que se me ha ocurrido, es cuestión de probar

Saludos

emiliu 27-11-2005 16:27:35

ok muchas gracias amigo, y perdón una última pregunta, alguien me puede decir cual es la propiedad para cerrar el formulario, es que soy muy aprendiz todabía :p

Héctor Randolph 27-11-2005 16:28:14

Hola emiliu

Olvide algo en el mensaje anterior, estoy suponiendo que la forma en cuestión es la forma principal de la aplicación; si no es así entonces el en evento OnTimer habriá que forzar a cerrar la aplicación

Código Delphi [-]
   Application.Terminate;

Saludos

Héctor Randolph 27-11-2005 16:29:19

Cita:

Empezado por emiliu
alguien me puede decir cual es la propiedad para cerrar el formulario

El método epara cerrar unicamente la forma es Close
Saludos

emiliu 27-11-2005 16:37:12

gracias amigo!!! :D ahora mismo me pondré con ello


La franja horaria es GMT +2. Ahora son las 08:04:18.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi