Форум: "Основная";
Текущий архив: 2002.10.17;
Скачать: [xml.tar.bz2];
ВнизПриостановка выполнения цикла. Найти похожие ветки
← →
Ryser (2002-10-07 16:41) [0]Есть цикл на OnTimer.
Нужно каким-то образом задержать переход на новый круг выполнения цикла на некоторое кол-во времени.
Естественно, Break и т.п. не уместны.
Как быть?
← →
Внук (2002-10-07 16:42) [1]Sleep?
← →
Ryser (2002-10-07 16:47) [2]Похоже на то. Но эффект не совсем тот. Sleep вешает все приложение, а не конкретно цикл.
← →
Внук (2002-10-07 16:51) [3]Так надо бы поподробнее рассказать. В частности - требуется остановить цикл в пределах одного тика таймера или пропустить несколько тиков, зачем останавливать, может, выделить цикл в отдельный поток, может, флагами поиграть...
← →
Демонов Е.В. (2002-10-07 16:55) [4]procedure wait(mili:cardinal);
var t:Cardinal;
begin
t:=getTickCount;
while getTickCount<t+Mili do
application.ProcessMessages;
end;
Может так ? попробуй.
← →
AFrolov (2002-10-07 16:56) [5]1. Цикл надо делать в отдельном потоке - все приложение не будет подвешиваться.
2. Либо while (условие ожидания) -вместо sleep
Application.ProcessMessages.
← →
Ryser (2002-10-07 17:16) [6]Вот такая процедура. Нужно как-то задержать переход к следующей записи в ЛистБокс
begin
//****** цикл перемещения по узлам
for I := 0 to ListBox1.Items.Count-1 do
begin
//
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.10.17;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.007 c