Вопрос и Ответ 7

которая останавливает выполнение текущей задачи и запускает ждущую задачу. Но в Delphi эта функция не работает, она заменена на аналогичный метод ProcessMessages объекта TApplication.

Пример:

............

WHILE NOT EOF(F) DO BEGIN

Read(F, i);
Application.ProcessMessages;