![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
цикл 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