ПрогрессБар в строке состояния
ПрогрессБар в строке состояния. Маленький, шустренький (без ВК)
- Описание
- Подробнее
Описание
В Глобальный модуль вставить процедуру:
//******************************************************************************
Процедура глПрогрессор(Сообщение,Всего,Текущ) Экспорт
Если Всего>0 Тогда
Процент=Цел(Текущ/Всего*100);
Если Процент > Цел((Текущ-1)/Всего*100) Тогда
Состояние(Сообщение + «: «+Формат(Процент,»Ч(0)2»)+»% «+СтрЗаменить(Формат(«»,»С»+Мин(99,Процент)),» «,»l»)+СтрЗаменить(Формат(«»,»С»+Мин(99,99-Процент)),» «,»‘»)+»l»);
КонецЕсли;
КонецЕсли;
КонецПроцедуры
И пользовать.. Вот пример:
Для ин=1 По 100000 Цикл
глПрогрессор(«Тест»,100000,ин);
КонецЦикла;