Ejecutar 2 timers a la vez
Hola, chicos he buscado y no he encontrado nada de esto, por eso os lo pregunto a ver si alguno lo sabe hacer.
Lo que quiero es que 2 timers se ejecuten simultaneamente, conforme lo tengo ahora se ejecuta uno y despues el otro. Código:
procedure TForm1.Label2Click(Sender: TObject); |
Todo en informática es secuencial. La diferencia entre el primer timer y el segundo serán milésimas de segundo...
Lo que haces es habilitar los timers. Eso es como poner una alarma y que esa alarma llame a una función cuando llegue el momento. Si los dos están puestos a 5 segundos, el primero ejecutará su sección OnTimer unas milésimas de segundo antes que el otro, siempre y cuando el primero no colapse la cpu. ¿Cuál es el problema? |
Los timers los tengo a 200 milisegundos, y mis acciones son:
Un timer aumenta la propiedad height de 2 en 2 de un componente hasta un tope, y el otro disminuye la misma propiedad de otro componente hasta otro tope. Cuando llegan al tope se desactivan. De manera que da la sensacion que el que se hace mas grande se despliega y el que se hace mas pequeño se repliega. El problema es que quiero que se haga todo a la vez, uno que se agrande y el otro que encoja. Y lo que ahora sucede es que primero encoge uno y luego agranda el otro. |
Parece problema del programa, pon el código fuente que lo veamos :)
|
Yo pondría un solo timer:
|
Ok, gracias. Me ha servido.
Saludos. |
La franja horaria es GMT +2. Ahora son las 11:21: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