borland c++ builder6.0 下延时函数,不会使cpu进入休眠状态,正正常触发timer...

void __fastcall TFrm::delay(int time)
{
    int start=::GetTickCount();
    while(::GetTickCount()-start<time)
        {
            Application->ProcessMessages();
        }
}

引用请注明出处！3KS！