Функции для работы с объектами > Функции создания объектов >

CreateProgress – создать индикатор процесса

Предыдущий раздел В начало Следующий раздел

Синтаксис:

function CreateProgress(

[optional] Caption: WideString;

[optional] Max: Integer;

[optional] IsBreakable: WordBool = False): IProgress;

Параметры:

Caption - заголовок окна индикатора;

Max – максимальная позиция полосы прогресса, расположенной в окне индикатора. Если значение не задано, то форма индикатора не будет отображать полосу прогресса;

IsBreakable – возможность прерывания процесса, ход выполнения которого отображает индикатор: True, если процесс можно будет прервать, нажав на кнопку Прервать, False, если процесс невозможно прервать. Если процесс невозможно прервать, то на форме индикатора не будет кнопки Прервать.

Возвращаемое значение:

Объект работы с индикатором.

Описание:

Функция создает индикатор процесса. Индикатор процесса предназначен для визуального отображения информации о ходе выполнения длительных процессов.

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

// Перенести все документы, найденные поиском, в хранилище.

// Contents - список документов, найденных поиском.

// FileStorage - хранилище электронных документов.

if Contents.Count > 0

 Progress = CreateProgress('Перенос документов в хранилище';

   Contents.Count; False)

 Progress.Show

 foreach EDocumentInfo in Contents

   EDocument = EDocumentInfo.Document

   EDocument.MoveToStorage(FileStorage)

   Progress.Next

 endforeach

 Progress.Hide

endif

Русскоязычный аналог имени функции:

СоздатьИндикатор