| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как сделать цикл зависимым от времени? [D7, WinXP]

jeon1 ©   (2005-07-22 19:53:00) 

Как сделать цикл зависимым от времени? То есть мне нужно, чтобы цикл выполнялся несколько секунд и выходил из него. На VB я это делал так:
 a = Timer()
 While Timer() - a < 3
   Print "bla-bla"
 Wend

Здесь цикл работает три секунды.
А как сделать тоже самое на делфи?

---

vers   (2005-07-23 00:13:00) [1]

Или еще GetTickCount. Но не забываем в цикле Application.ProcessMessages

---

Alx2   (2005-07-22 23:40:00) [2]

sleep(Ms)

---

jeon1   (2005-07-22 20:09:00) [3]

спасибо. Очень помогли

---

DesWind   (2005-07-22 19:58:00) [4]

Тоже самое


starttime:=now;
while Now-starttime<deltatime do
begin
...
end;



---

Наверх