|
Добрый день.
Предположим есть:
Repaet
Until
Для того чтобы увидеть ход выполнения работы внутри цикла, и для того чтобы увидеть когда выборка закончиться - можно использовать строки
Dial.OPEN('Выполнение @1@@@@@@@');
I_COUNT := Employee1.COUNT;
Repeat
I := I + 1;
Dial.UPDATE(1,ROUND((I / I_COUNT * 10000),1));
Until
-----------------
А, вот если много вложенных :
REPEAT
REPEAT2
REPEAT3
UNTIL3
UNTIL2
UNTIL
как в этом случае написать код - чтобы один прогресс отображал все действия ?????
|