Библиотека программиста

28.03.2024 - Компонент Индикатор процесса

Разместил: adminКатегория: Компоненты Delphi
Размер файла: 28.37 KBДата: 28.03.2024
Версия: 1.0Скачали: 220

Индикатор прогресса. Нужен, чтобы отображать процесс выполения длительных циклов. В отличии от простого ProgresBar'а показывает, сколько времени прошло с момента запуска и сколько примерно осталось.

Сделан из TGauge, TstasusBar, TPanel и TTimer. Основные методы: Start(StartValue, StopValue: Int64) и Stop. Первый запускает процесс отображения цикла, второй останавливает его. Чтобы периодически отображать изменения величины внутри цикла, надо изменять свойство CurrentValue: Int64. При этом вызывается Application.ProgressMessages, чтобы программа не казалась зависшей при длительном счете. Один раз в секунду изменения отображаются. Генерирует события OnStart при запуске отображения и OnStop при остановке. Свойство StopedVisible: Boolean определяет, должен ли индикатор быть видимым, если процесс остановлен. По умолчанию False – не должен.

Опубликовано на сайте: http://www.coders-library.ru
Прямая ссылка: http://www.coders-library.ru/index.php?name=files&op=view&id=717