Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   TTimer de intervalo pequeño (https://www.clubdelphi.com/foros/showthread.php?t=18724)

emeceuy 21-02-2005 15:23:22

TTimer de intervalo pequeño
 
Hola a todos...

Estoy haciendo una aplicación para modular la velocidad de un motor a través del puerto paralelo. Para eso utilizo el Ttimer que trae el delphi pero resulta que el inervalo de ejecución me queda un poco grande y necesitaría un timer que se ejecute mas veces por minuto. El timer que uso dice que tiene hasta 1ms, pero resulta que la respuesta varía hasta 50ms, de ahí hacia abajo no hay variación.

Lo que hago actualmente es en cada ejecución del timer, manda a un bucle de intervalo 4000 que realmente va rápido. Así la verdad que funciona bastante bien, pero me gustaría ver si puedo encontrar un timer que funcione mas rapidamente (con un intervalo mas pequeño) para no tener que hacer este invento del bucle.

Muchas gracias a todos...

mArCeLo

Ricardojosep 21-02-2005 18:41:53

Cita:

Originalmente publicado por emeceuy
...necesitaría un timer que se ejecute mas veces por minuto. El timer que uso dice que tiene hasta 1ms, pero resulta que la respuesta varía hasta 50ms, de ahí hacia abajo no hay variación...
Hola emeceuy;

Pues cuantas veces por minutos tienes que ejecutar ese proceso?????, 1 ms es una milsesima de segundos, mas pequeño que eso es una millonesima de segundos y bastante complicado tener un Timer asi.
Dinos cuantas veces por minutos quieres que se ejecute aproximadamente.

Saludos.
Ricardo

andres1569 22-02-2005 17:28:24

Cita:

Empezado por emeceuy
El timer que uso dice que tiene hasta 1ms, pero resulta que la respuesta varía hasta 50ms, de ahí hacia abajo no hay variación.

Efectivamente, en torno a 50 ms (1/18 parte de un segundo) está la precisión del TTimer, que no es otra cosa que una intertaz al recurso Timer del API de Windows.

Cita:

Lo que hago actualmente es en cada ejecución del timer, manda a un bucle de intervalo 4000 que realmente va rápido. Así la verdad que funciona bastante bien, pero me gustaría ver si puedo encontrar un timer que funcione mas rapidamente (con un intervalo mas pequeño) para no tener que hacer este invento del bucle.
Pues lo del bucle no es mala idea salvo que te ralentiza el resto de la aplicación. Creo que te convendría implementarlo dentro de un hilo aparte (mira los TThreads) de manera que no interfieriera con el resto de procesos (tampoco sé si son muchos o no). Dicho TThread se encargaría de tener en marcha un bucle continuamente y a cada intervalo deseado lanzar la acción que desees, puedes valerte de la función GetTickCount (windows.pas) o bien de QueryPerformanceCounter que es más precisa para saber el tiempo transcurrido.

Puede que interese leer el siguiente artículo de I. Marteens:

http://www.marteens.com/trick4c.htm

Saludos

Mick 23-02-2005 21:06:46

La forma mas sencilla es crear un Thread independiente, poner ese thread a maxima prioridad, y utilizar la funcion Sleep(milisegundos) para realizar las esperas.
Utilizar un bucle es una barbaridad ya que pones al 100% el procesador y el ordenador no puede hacer casi nada mas durante el tiempo del bucle.
En cambio al hacer el sleep, el thread se suspende durante el tiempo indicado, y el procesador queda libre para ejecutar otros threads o tareas que puedan existir, o no hace nada si no hay nada pendiente, pero por lo menos aunque no haya nada que hacer no recalientas el procesador sin razon ejecutando el bucle.
Cuando el tiempo indicado pase, el control de ejecucion vuelve al thread que tenia el sleep.

Saludos


La franja horaria es GMT +2. Ahora son las 14:35:12.

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