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

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

цикл repeat..until false. Как параллельно с ним че-нить делать.


Igit ©   (2002-06-07 20:36:00) 

В програие у меня такая фенька:
vartime: integer;
begin
repeat
//тут меняются обои
sleep(5*time*6);
untilfalse;
end.
ТАк вот, хочу чтобы во время этого цикла у меня еще чо-нить делалось не обращяя внимания на sleep(5*time*6);


И.Б.   (2002-06-07 23:11:00) [1]

или запускай весь цикл в отдельном потоке или в цикл вставь строчку в цикл application.processmessages, чтобы обрабатывались сообщения, посылаемые окну


Song   (2002-06-07 23:07:00) [2]

2hooky-mars © (07.06.02 21:54)
При чём тут Sleep()? Последний полностью останавливает текущую нить.

2Igit © (07.06.02 20:36)
Для задержки используйте GetTickCount()
Для того чтобы процесс не подвисал - Application.ProcessMessages (вставить в тело цикла)


Igit   (2002-06-07 22:47:00) [3]

А чуть-чуть по-подробнее, pls :)


hooky-mars   (2002-06-07 21:54:00) [4]

Application.ProcessMessages


Anatoly Podgoretsky   (2002-06-07 20:41:00) [5]

ProcessMessages, TThread


Наверх

Титульная страница Поиск, карта сайта Написать письмо