[aspotkin]

Собственно, сабж... Первый раз цикл отрабатывает нормально. При втором проходе зависет. Абы когда, не на одной записи в массиве

start:

Код:

 Form2.ADOQuery1.SQL.Clear; // удаление предыдущего текста запроса
 mySQL := 'UPDATE `'+team+'` SET `url` ='''+url+'''  WHERE `vkid` ='''+idvk+''';';  //обновляем нашу запись
 Form2.ADOQuery1.SQL.Add(mySQL); // добавление нового текста запроса
 Form2.ADOQuery1.ExecSQL;
 Form2.ADOQuery1.Active := false; // отключаем запрос, если он был включен
 Form2.ADOQuery1.SQL.Clear; // удаление предыдущего текста запроса
 // новый запрос – код подставляется из поля Edit
 if (time>=8) and (22>=time) then begin
...................
В конце цикла  
goto start;

Админ: Пользуемся тегами при оформлении кода! При рецедиве бан

Не подскажете, в чем может быть проблема? Какие-то ограничения Delphi на время выполнения программы? Когда зависает - висит загрузка CPU на уровне 23-25%...