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

Свойство Text – текст индикатора

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

Синтаксис:

 rw  property Text: WideString;

Описание:

Свойство предоставляет доступ к значению текста индикатора. Текст отображается на форме индикатора процесса.

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

 

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

// 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

См. также

Свойство Title