Отправлено Винни Пух 01 марта 2005 г. 12:45

form1.timer1.Interval:= delay;
form1.timer1.enabled:= true;
Пробовал так, не выходит.
Книжки под рукой нет.

• a чем sleep() не нравится? — Уэф   (01.03.2005 14:20, пустое)
• А не проще ли? (+) — Кодер   (01.03.2005 13:39, 125 байт)
  • тогда и правда Sleep лучше — DASM   (01.03.2005 14:01, пустое)
    • Ну если просто банальную задержку-то да, а если отсчитать от кого то момента, то GetTickCount — Кодер   (01.03.2005 16:02, пустое)
      • Sleep отдаст время другим задачам, а GetTickCount в данном случае все подвесит — DASM   (01.03.2005 16:13, пустое)
        • Вот это и имелось ввиду, что можно еще что то сделать между замерами пройденного времени GetTickCount'ом, а Sleep будет тупо висеть... — Кодер   (01.03.2005 17:14, пустое)
• а функцию подцепить? — 99600036   (01.03.2005 12:46, 81 байт)
  • Сделал так — Винни Пух   (01.03.2005 12:58, 687 байт)
    • while (intoccurstimer1=0) do a:=1; блокирует выполнение основного потока. Либо создаем отдельный поток, либо запустив таймер ВЫХОДИМ из функции и отрабатываем его уже при возниконовении события таймера — DASM   (01.03.2005 13:02, пустое)
      • а кроме того - будет ли "intoccurstimer1" иметь статус "volatile" ? — -Tумблер-   (01.03.2005 15:11, пустое)
      • Кучно. Хоты бы Application.ProcessMessages воткнул! Если по уму делать - таймер по срабатыванию выставляет event, а ты его ловишь WaitForSingleObject(..) и ресетишь - вместо a:=1. Только так можно разгрузить проц на глухих ожиданиях. — Али Баба   (01.03.2005 13:15, пустое)
        • Похоже это гимор, полезу ка лучше за компонентой на torry.ru. P.s. спасибо за разъяснения — Винни Пух   (01.03.2005 13:19, пустое)
          • Встань курсором на "TTimer" и нажми F1. Неужто и хелпа нету?? Там же и пример найдешь. — Али Баба   (01.03.2005 13:24, пустое)
            • Проблему решил при помощи Sleep(время в милисекундах). Во как! — Винни Пух   (01.03.2005 13:45, пустое)
              • А я попытался в бидере выводить 1 mc на lpt - через sleep или таймер - сплошной облом, меньше 10мс не получилось, (с установкой приоритетов и т.д.), так и бросил. — vvvv   (01.03.2005 16:05, пустое)
                • Я тоже наблюдал, что меньше 10 мс не получается установить... — RedFroggy   (01.03.2005 16:56, пустое)
              • Молоток! ;) — Али Баба   (01.03.2005 15:09, пустое)