0
oleg_prg
05.12.14
✎
15:46
|
Уважаемые форумчане, добрый день. Подскажите пожалуйста, почему может не работать горизонтальный скролинг на управляемой форме - что посмотреть?
Код вывода
//******************************************************************************
&НаСервере
Функция СКДПрограммно()
Схема = Отчеты.ОтчетПоСправочникуКлиентов.ПолучитьМакет("ОсновнаяСхемаКомпоновкиДанных");
Настройки = Новый КомпоновщикМакетаКомпоновкиДанных;
Настройки = Отчет.КомпоновщикНастроек.Настройки;
Для А = 0 По Отчет.КомпоновщикНастроек.ПользовательскиеНастройки.Элементы.Количество()-1 Цикл
Настройки.Отбор.Элементы[А].Использование = Отчет.КомпоновщикНастроек.ПользовательскиеНастройки.Элементы[А].Использование;
Настройки.Отбор.Элементы[А].ПравоеЗначение = Отчет.КомпоновщикНастроек.ПользовательскиеНастройки.Элементы[А].ПравоеЗначение;
Настройки.Отбор.Элементы[А].ВидСравнения = Отчет.КомпоновщикНастроек.ПользовательскиеНастройки.Элементы[А].ВидСравнения;
КонецЦикла;
КомпоновщикМакета = новый КомпоновщикМакетаКомпоновкиДанных;
Макет = КомпоновщикМакета.Выполнить(Схема, Настройки);
ПроцессорКомпоновки = новый ПроцессорКомпоновкиДанных;
ПроцессорКомпоновки.Инициализировать(Макет);
ПроцессорВывода = новый ПроцессорВыводаРезультатаКомпоновкиДанныхВТабличныйДокумент;
ТабДок = Новый ТабличныйДокумент;
ПроцессорВывода.УстановитьДокумент(ТабДок);
ПроцессорВывода.Вывести(ПроцессорКомпоновки);
ТабДок.ПоказатьУровеньГруппировокСтрок(0);
ТабДок.ТолькоПросмотр = Истина;
Возврат ТабДок;
КонецФункции
//******************************************************************************
&НаКлиенте
Процедура Сформировать(Команда)
Элементы.РезультатСКД.ГоризонтальнаяПолосаПрокрутки = Ложь;
РезультатСКД = СКДПрограммно();
Элементы.РезультатСКД.ГоризонтальнаяПолосаПрокрутки = Истина;
КонецПроцедуры
Релиз 1С:Предприятие 8.2 (8.2.19.68)
Видео пробелмы (скачайте видео для качественного просмотра)
Заранее спасибо!
|
|