Application.ProcessMessages y Application.HandleMessages

[molinero1]

Me podrían explicar como utlizar Application.ProcessMessages y Application.HandleMessages para poner un sleep en segundo plano? Muchas gracias.

[dec]

Hola,

Podemos intentar explicártelo en la medida de nuestras posibilidades, pero, ¿podrías tú explicar qué entiendes por "poner un sleep en segundo plano"?

[molinero1]

Dec, felicidades por los 6000 mensajes. En primer lugar, creo que cuando se hace un sleep, el programa se queda como colgado, no puedes ver el programa si lo tienes por ejemplo minimizado. En segundo plano, me refiero a poder utilizar el programa, sin que se quede colgado.

[dec]

Hola,

Muchas gracias, hombre. Tu aplicación tiene un Hilo de ejecución "principal". El uso de "sleep" hace que se detenga el Hilo de ejecución de la aplicación. Lo mismo ocurriría mientras se estuviera un "bucle while" más o menos intrincado y complejo. En este último caso se podría hacer algo... precisamente con una instrucción "Applicacion.ProcessMessages" dentro del bucle... pero... en el caso del "Sleep"... me temo que esto no sea posible.

Pero es que hay que ver el uso de "Sleep". Un "Sleep" no es un bucle. No creo que sea habitual "Sleeps" de más de un par de segundos... al menos yo no he visto algo así. De modo que tal vez te convenga tirar por otro lado, tratar de encontrar otra solución, que no sea el uso de "Sleep" y que te solucione lo que necesitas. Existe algo como los "Hilos" secundarios, por ejemplo, puedes usar la clase "TThread" de Delphi para implementar más o menos sencillamente un segundo Hilo (aparte del principal) en tu aplicación.

Tal vez por ahí vayan los tiros... pero, yo creo que tal vez podrías explicar un poco qué quieres hacer y tal vez alguien podría echarte una mano dándote alguna que otra idea. Pero... probablemente tengas que olvidarte del "Sleep" porque no se justifique su uso. Al menos es lo que pienso a bote pronto.

[molinero1]

Tengo un procedure, que quiero que se llame a si mismo, pero por ejemplo cada media hora, y luego en un for, quiero que haga una instrucción, cada tres minutos.

[dec]

Hola,

Estupendo. Por lo que dices creo que lo que estás necesitando es un "TTimer". Un "TTimer" es un cronómetro (que corre en segundo plano respecto del Hilo principal de tu aplicación, y que por lo tanto no atrapará a este), digo, es un cronómetro que cuenta con un evento "OnTimer".

Tienes el "TTimer" en la pestaña "System" de la paleta de componentes de Delphi. Asignas un intervalo de 1800000 milisegundos (30*60*1000) a la propiedad "Interval" del "TTimer"... "True" a su propiedad "Enabled"... y tendrás que cada 30 minutos se disparará el evento "OnTimer" del "TTimer".

El "TTimer", como queda dicho, no ocupará el Hilo principal de tu aplicación. Ahora bien, cuando lleguemos al evento "OnInterval"... si ahí se ha de ejecutar un bucle "for" o "while"... tal vez entonces sea bueno contar con un "Application.ProcessMessages", dentro del bucle, empero, en todo caso creo que el problema se habrá reducido no poco, tal vez incluso eliminado del todo.

En todo caso: olvídate del "Sleep". Si quieres hacer "algo" cada cierto intervalo de tiempo el componente "TTimer" es lo que andas buscando.

PD. Adjunto un sencillo ejemplo de "reloj" que utiliza un "TTimer" para mantener actualizada la hora.

[molinero1]

Lo he provado y mas o menos me sale, pero me surgen dos dudas, Application.ProcessMessages que hace exactamente y donde lo tengo que poner? y en el evento on timer puedo llamar a un procedimiento creado por mi?