Индикатор отчета для Обычных форм Процедура СформироватьОтчет(Кнопка) Элем = ЭлементыФормы.Добавить(Тип("Индикатор"), "Инд1", Истина); Элем.Верх = ЭтаФорма.Высота - 20; Элем.Высота = 25; Элем.Ширина = 150; Элем.ОтображатьПроценты = Истина; Элем.МинимальноеЗначение = 1; Элем.МаксимальноеЗначение = 100; Состояние( "Выводим данные отчета"); Для сч = 1 по 100 Цикл Для ф=1 по 1000 Цикл //спим КонецЦикла; //ваш алгоритм обновления индикатора Элем.Значение = сч; ЭтаФорма.Обновить(); КонецЦикла; ЭлементыФормы.Удалить(Элем); КонецПроцедуры @odin1C_rus 1.2K views06:42