Hacer que el programa espere un tiempo, como con el delay del turbo pascal

Por Saiyine el 0000-00-00 00:00:00 - Secciones: DELPHI - Enlace permanente: 476

function Delay(tiempo : integer);
var
aa : integer;
begin
        aa:=GetTickCount;
        while GetTickCount-aa<2000 do;
end;

" title="MrRidk">MrRidk (14/01/2005, 18:31)

Que pasa saiyine, pues te informo de que para hacer eso existe un API de windows que hace eso:

Se llama Sleep y bastaría con pasarle como parametro el nº de milisegundos que queires dormir tu app. En este caso seria algo asi como ... Sleep(2000);

Aparte de la comodidad de usar un API, consigues que durante ese tiempo, el proceso no coma recursos de la CPU...

Un saludo...MrRidk

" title="Saiyine">Saiyine (15/01/2005, 00:30)

¡Buenas!

Cierto, cierto, mucho mejor con un sleep, que es una instrucción que poseen casi todos los lenguajes, que raro que usase el bucle este. Pero claro, hace tanto tiempo que a saber...

¡Otro saludo para ti!

Otras entradas de la web que podrian interesarte:

(498) nov 30 DELPHI Salida de numeros decimales limitada, al estilo de los dos puntos (:) en los writeln del turbo pascal
(443) ene 01 DELPHI Como crear un bitmap en tiempo de ejecucion y como dibujar puntos mas rapidamente que con pixel[]
(499) nov 30 DELPHI Salir del programa con una ventana de 'SI,NO,CANCELAR'
(717) oct 30 DELPHI PASCAL NPRIMOS Calcular si un numero es primo en Delphi - Pascal
(531) nov 30 LINUX ¿Como hacer que un programa se ejecute cuando arrancan todos los usuarios? Ahora lo hago para mi usuario modificando mi .bashrc ¿es correcto?

1622

Anonimo (2007-12-11 01:11:25)

oigan chicos, con todo respeto.

pero, .... si usa un sleep... me da la impresion que de todos modos consume recursos (convengamos en que talvez menos recursos, pero habria que investigar mas a fondo), pero de que consume, consume.

digo.

1624

Saiyine (2007-12-12 12:28:41)

¡Anda! Perdonad, efectivamente, este código está mal, cuando pueda lo cambio por un sleep, que no, no deberia utilizar recursos.

o o o o