BCB中实现延时.doc

如何在BCB中实现延时(不依赖机器的速度)
因为Sleep的作用是把当前线程转为休眠状态(暂时失去CPU资源)一段时间,而不是仅仅“延时”。所以,你的程序在使用Sleep后,整个线程,包括消息循环都没有执行的机会。在GUI主线程里面要慎重使用这个函数,因为整个界面都会被“Sleep”。你可以使用Timer,或者自己在循环里面判断时间流逝,同时使用Application->ProcessMessages(),以保证消息队列的及时处理。
Sleep(   )的缺点是延时时,不再响应消息,若时间较长,象死了一样,所以,
我常用:   
      用两个GetTickCount(   )函数相减得到时钟数,
   void   delay(unsigned   int   n);       //   延长n毫秒   
  {   
            int   t0=GetTickCount(   );   
            while   (GetTickCount()-t0<n)   
                    Application->ProcessMessages();     //   响应消息   
  }
本文主要介绍了分别用TTtimer控件,Sleep函数,GetTickCount函数来实现延时的方法:
1)TTtimer控件
TTtimer控件的实质是调用Windows API定时函数SetTimer和KillTimer来实现的,并简化了对WM_TIMER 消息的处理过程。通过设置OnTimer事件和Interval属性,我们可以很方便的产生一些简单的定时事件。
2)Sleep函数
Sleep函数用来使程序的执行延时给定的时间值。Sleep的调用形式为Sleep(milliseconds),暂停当前的进程milliseconds毫秒。Sleep的实现方法其实也是调用Windows API的Sleep函数。例如:
sleep(1000);        //延迟1000毫秒
Sleep会引起程序停滞,如果你延迟的时间较长的话,你的程序将不能够