Кто поделится ФАЛЬШ-ПрогрессБаром для работы по ВРЕМЕНИ.
=========================================
Много длит.операций в БД не поддерживают сообщения о позиции выполнения.
Пункты ТЗ:
- в виде dfm
- в виде потока (а как ещё?)
- простой код (можно без картинок)
- показывает время (прошло/осталось)
- запуск например в виде:
Progr := TMyProgress.Create;
Progr.Start(30); // минут
...............
.........
// длительный код в основном потоке
...............
.........
Progr.Stop; // если по времени длительный код выполнялся более 30 минут.
Progr.Free;
Mess('Операция выполнена'). |
|