задержка в 1 сек делфи

Тема в разделе "ASM, С/С++, Delphi, Java", создана пользователем Bicdibus, 10 июл 2012.

Статус темы:
Закрыта.
Опции темы
  1. Bicdibus

    Bicdibus

    Регистр.:
    5 мар 2010
    Сообщения:
    495
    Симпатии:
    7
    как организовать задержку в 1 секунду на делфи
     
    Bicdibus, 10 июл 2012
    #1 Вверх
  2. o_nix

    o_nix

    Регистр.:
    7 ноя 2007
    Сообщения:
    1.073
    Симпатии:
    1.039
    sleep(1000);
     
    o_nix, 10 июл 2012
    #2 Вверх
  3. Any_Key

    Any_Key aka mad red cat

    Регистр.:
    30 мар 2006
    Сообщения:
    390
    Симпатии:
    347
    Пример реализации своего аналога sleep
    Иногда в потоках sleep становится невероятным злом, вот такие кривые костыли помогают.
    PS возможны ошибки так как писал из головы а на делфе практически не пишу уже.
     
    Any_Key, 19 июл 2012
    #3 Вверх
  4. xpert13

    xpert13 <(*_*)>

    Moderator
    Регистр.:
    7 ноя 2008
    Сообщения:
    182
    Симпатии:
    457
    Эта строчка - зло:
    Код:
    while (settime<GetTickcount) do continue;
    Будет сильно грузить процессор, лучше уже так:
    Код:
    while (settime<GetTickcount) do
begin
  sleep(25);
end;
     
    xpert13, 19 июл 2012
    #4 Вверх
  5. startus

    startus Создатель

    Регистр.:
    7 окт 2011
    Сообщения:
    39
    Симпатии:
    5
    Лучше таки собітие на таймер ставь.
    В крайнем случае sleep(1000) но прога тупо повисает на данный промежуток времени.
    Лечится этим: Application.Processmessages
     
    startus, 23 авг 2012
    #5 Вверх
Статус темы:
Закрыта.