Объекты DIRECTUM

 

Объект IProgress

 

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

Синтаксис:

Описание:

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

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

 

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

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