vc下的dalay函数实现

DWORD   begintime=GetTickCount();  
  do  
  {  
      MSG                 msg;  
      if   (PeekMessage(&msg,   NULL,   0,   0,   PM_REMOVE))  
      {  
          TranslateMessage(&msg);//   Translates   virtual   key   codes  
          DispatchMessage(&msg);   //   Dispatches   message   to   window  
      }  
  }while(GetTickCount()