int time=GetTickCount();
while((GetTickCount()-time)<1000))//Или меняй задержку на свою
          {
          Application->ProcessMessages();
          }