Объекты DIRECTUM

 

Объект IProgress

 

Свойство Max – максимальная позиция

Синтаксис:

 rw  property Max: Integer;

Описание:

Свойство предоставляет доступ к максимальной позиции полосы прогресса. Минимальная позиция полосы прогресса - 0. Когда отображаемый индикатором процесс завершится, значение свойства Position должно быть равно максимальной позиции.

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

 

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

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

if Contents.Count > 0

  Progress = CreateProgress(''; 0; False)

  Progress.Max = Contents.Count

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

  Progress.Show

  foreach EDocumentInfo in Contents

    EDocument = EDocumentInfo.Document

    EDocument.MoveToStorage(FileStorage)

    EDocument.Save

    Progress.Next

  endforeach

  Progress.Hide

endif

 

 

См. также:

·         свойство Position.