Привожу код тестовой обработки, содержащей функции реализации прогресс бара:
Перем СтатусИтерация, СтатусМаксимум, СтатусРасшифровка;
Процедура ПересчетКонтрагентовНажатие(Элемент)
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| Контрагенты.Ссылка
|ИЗ
| Справочник.Контрагенты КАК Контрагенты
|ГДЕ
| Контрагенты.Покупатель = ИСТИНА";
Результат = Запрос.Выполнить();
ПрогрессБарСброс("Обход контрагентов"); //Сброс и установка текста статуса.
ПрогрессБар(0,Результат.Выгрузить().Количество()); //Установка максимального значения прогресс бара.
ВыборкаДетальныеЗаписи = Результат.Выбрать();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
ПрогрессБар(); //Увеличение шага итерации и отрисовка прогресс бара в статус строке.
ЭлементыФормы.Надпись1.Заголовок = ВыборкаДетальныеЗаписи.Ссылка.Наименование;
ОбработкаПрерыванияПользователя();
КонецЦикла;
КонецПроцедуры
//------------------------------------------------------------------------------
// Статус строка
//------------------------------------------------------------------------------
Процедура СтатусСтрока() //Отрисовка прогресбара в статус строке
Процент = ?(СтатусМаксимум>0,Окр(СтатусИтерация/СтатусМаксимум*100),0);
сс="----------------------------------------------------------------------------------------------------";
ссл=Лев(сс,Процент);сср=Прав(сс,100-Процент);
ссл=СтрЗаменить(ссл,"-","]");
сс=ссл+сср;
Состояние(""+СтатусРасшифровка+": "+сс+" "+Процент+"%");
КонецПроцедуры
Процедура ПрогрессБарСброс(СтТекст="") //Сбрасывает прогресбар с статус строке
//При указании параметра - устанавливаем текстовое значение прогресс бара
СтатусРасшифровка = СтТекст;
СтатусИтерация=0;
СтатусМаксимум=0;
Состояние("");
КонецПроцедуры
Процедура ПрогрессБар(ДобавитьИтерацию=1,ДобавитьМаксимум=0) //шаг итерации
// ПрогрессБар() - увеличивает шаг на 1
// ПрогрессБар(0,Максимальное значение) - устанавливает максимум для значения прогресс бара
СтатусИтерация=СтатусИтерация+ДобавитьИтерацию;
СтатусМаксимум=СтатусМаксимум+ДобавитьМаксимум;
СтатусСтрока();
КонецПроцедуры
ПыСы: в коде пришлось вставить другие, упрощенные символы формирования полосы прогрессбара. В фото и гифке использовал символы из стандартной таблицы символов Windows. А вообще можете подобрать на свое усмотрение.
Вступайте в нашу телеграмм-группу Инфостарт