Объект PBar

1. Назначение

Предназначен для визуализации процесса выполнения продолжительного во времени процесса. Визуально представляет собой экран с "ползуном", процентным соотношением выполненной и оставшейся работы, временем выполнения и прогнозированным временем до конца выполнения процесса. Может содержать кнопку "Прервать выполнение", в этом случае управляющий процесс должен обрабатывать атрибут NeedBreak.

Создается при помощи вызова глобальной функции ProgressBar.

2. Методы и атрибуты класса

Тип Имя Описание
Str Caption RW: Название последнего найденного файла
Int Min RW: Минимальная позиция "ползуна"
Int Max RW: Максимальная позиция "ползуна"
Int Position RW: Текущая позиция "ползуна"
- Inc Увеличить значение текущей позиции "ползуна"
- Show Отобразить окно на экране
- Hide Спрятать окно (убрать с экрана)
Bool NeedBreak RO: Признак того, что пользователем была нажата кнопка "Прервать выполнение"

3. Пример использования

Пример использования данного класса на языке VBScript

Set PB = ProgressBar( TRUE )
Set Gr = Grid(100200, 0, 0)
PB.Max = Gr.RecordCount
PB.Caption = "Перебираем значения"
Do While FF.Found
<- - ->
If PB.NeedBreak Then
Exit Do
End If
PB.Inc()
Loop

© СКА -=Оберон=-