Неправильная задержка по времени

[Sergey1985]

Здравствуйте. На повестку дня выносится такой вопрос.
   В приложении создал отдельный поток (при помощи класса TThread) и в обработчике Execute сделал бесконечный цикл while(1) {   } c WaitForSingleObject внутри.

  void __fastcall TThreadSSN::Execute()
{
FreeOnTerminate = true;
        //---- Place thread code here ----
        while (1)
  {

    WaitForSingleObject(hShow,10);
   ..
  }
}
событие hShow нигде не фигурирует и никогда не становится активным.
Так вот сам вопрос)))  Когда Builder6 включен прога работает как надо т.е. задержка выдерживается примерно в 10 млсек. Как только Builder6 выключаю задержка 15    млсек! Кто нить сталкивался с такими проказами природы?   

[POV]

Гыгы.. это ж таймер ) Не дождесся от него точности.

[S0mbre]

А зачем такой изощренный способ делать паузу? Не пробовал просто Sleep(10) ?

[Sergey1985]

Я читал (по моему у того же Архангельского) что Sleep(10) это и есть   WaitForSingleObject(hEvent,Time); только запихнутый в эту функцию Sleep;

[POV]

Попробуй в потоке крутить код типа:

Код

#include 
 
TDateTime LastDT;
...
 
 
 void __fastcall TThreadSSN::Execute()
{
        LastDT = Now();
       while (!Terminated)
   {
               if (MilliSecondOf(Now()-LastDT) >= 10)
               { // реакция. например, флаг выставляется
                  LastDT = Now();
                       ...
               }
       }
}