Имеется следующий код

repeat
    inc(count);

    {
       Много-много вычислений, при каждой итерации их становится больше, время полного прохода по циклу
        достигает нескольких секунд
    }

    Chart1.SeriesList.Series[0].AddXY(vCount, iter_count / 1000);
    {
       в конце каждой итерации, в чарт заносится значение, но не отображается !!
        а вот после завершения этого длительного цикла на чарте уже появляется график полностью
    }
until count = vStep;

Можно ли сделать чтобы значения в чарте отражались после каждой итерации ?

ProcessMessages добавлять не пробовал, чтобы Chart обрабатывал событие добавления как положено?

Спасибо !