Объекты DIRECTUM > Служебные формы > IProgress – индикатор процесса >

Свойство Position – текущая позиция

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

Синтаксис:

 rw  property Position: Integer;

Описание:

Свойство предоставляет доступ к текущей позиции полосы прогресса. Установка свойства приведет к перемещению индикатора в новую позицию. Например, для того чтобы индикатор показал, что процесс завершен, следует установить значение свойства Position, равным значению свойства Max.

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

 

// Записать в файл строки списка.

// List – список строк.

// FileName - Имя файла.

Progress = CreateProgress('Запись в файл'; List.Count; False)

Progress.Show

I = 0

while I <= List.Count - 1

 Progress.Text = List.Values(I)

 ФайлЗаписать(FileName; 'Д'; List.Values(I))

 I = I + 1

 Progress.Position = I

endwhile

Progress.Hide

См. также

Свойство Max