Имя: Пароль:
1C
1С v8
УТ 11.3 вывод на печать из команды
0 picom
 
21.09.17
08:08
Есть добавленный самодельный документ в УТ 11.3.
Вывод на печать макета из этого документа организован через команду.
При выводе на печать нет крупных кнопок печати, которые есть во всех типовых документах.
Подскажите самый простой способ вывода на печать из этой команды с нужными мне красивыми кнопками из БСП100500.
Код

&НаКлиенте
Процедура ОбработкаКоманды(ПараметрКоманды, ПараметрыВыполненияКоманды)
    ТабДокумент = Заполнялка(ПараметрКоманды);
    ТабДокумент.Показать("Шедевр");
КонецПроцедуры

&НаСервере
Функция Заполнялка(ДокСсылка) Экспорт
    ТабДокумент = Новый ТабличныйДокумент;
    
    ТабДокумент.АвтоМасштаб = истина ;
    ТабДокумент.ОтображатьСетку = Ложь;
    ТабДокумент.ТолькоПросмотр = Истина;
    ТабДокумент.ОтображатьЗаголовки = Ложь;
    
    
    Макет = ДокСсылка.ПолучитьОбъект().ПолучитьМакет("Шедевр");
    ОбластьМакета = Макет.ПолучитьОбласть("Шапка");
  
    ТабДокумент.Вывести(ОбластьМакета);
    Возврат ТабДокумент;
КонецФункции
1 Wirtuozzz
 
21.09.17
08:13
(0) чем не устраивает типовой вывод на печать?
2 picom
 
21.09.17
08:27
(1) микроскопической кнопкой вывода на печать
3 ildary
 
21.09.17
08:30
(2) Элементы.ПодменюПечать.Отображение = ОтображениеКнопки.КартинкаИТекст;

поместить в МодификацияКонфигурацииПереопределяемый.ПриСозданииНаСервере()

и ваши волосы стали шелковистыми
4 ildary
 
21.09.17
08:32
Для универсальности (если лень прописывать условия) можно тупо поместить этот код в попытку.
5 ildary
 
21.09.17
08:34
Я еще делаю так (чтобы подменю всегда было на одном и том же месте):

        Элем = Форма.Элементы.Найти( "ПодменюПечать" ); // ПодменюПечать последнее в панели
        Если Элем <> Неопределено Тогда
            Элементы.Переместить( Элем, Форма.КоманднаяПанель );
        КонецЕсли;

а в (3) заменить строку на

Форма.Элементы.ПодменюПечать.Отображение = ОтображениеКнопки.КартинкаИТекст;
Есть два вида языков, одни постоянно ругают, а вторыми никто не пользуется.