| Pregunta: | 37097 - DETENER APLICACION DURANTE UNOS SEGUNDOS |
| Autor: | nicolas paez |
| Necesito pausar mi aplicacion durante x segundos.
En otros lenguajes utilizaba la funcion delay (x), pero en Delphi no tengo idea. Probé con el delay, pero no funciona y en la ayudal de Delphi no existe. Gracias. | |
| Respuesta: | Daniel Serrano |
| Hola te recomiendo que utilizes la función
Sleep(1000) eso equivale a un segundo si quieres mas pues multiplicalo por la cantidad de segundos que quieras. Suerte! | |
| Respuesta: | Javier Navarro |
| Puedes usar el componente TTimer que se encuentra en la pestaña de System, en las propiedades lo dejas en Enabled := False y cuando quieras que empiece a contar el tiempo de espera lo pones enabled := True y en Interval = 1000 que es el equivalente a 1 segundo. Necesitas declarar una variable de tipo Integer (Sec) para que cuente 1 por cada segundo que transcurra:
procedure TForm1.Timer1Timer(Sender: TObject); var Sec : Integer; begin Sec := Sec + 1; Label1.Caption := IntToStr(Sec); end; Este código está en el evento OnTimer y por cada segundo que transcurra lo va a desplegar en el Label1. Ya validaras en tu programa como manipulas la variable Sec. Espero te sirva | |