Имя: Пароль:
1C
1С v8
Вывести картинку в табличный документ (УФ)
0 iva77ru
 
13.01.16
12:55
Нужно в ТОРГ 12 приклеить печать. Рассматриваю вариант добавление картинки в сформированный макет. Картинка не отображается:

    ОбластьПечатьОрганизации = ТабличныйДокумент.ПолучитьОбласть("Подвал");
    Картинка= Новый Картинка("D:\1С\Обработки\УправляемыеФормы\БП\Торг12\Печати\Печ_ТОРГ12.jpg");
    
    КартинкаПечатьОрганизации = ОбластьПечатьОрганизации.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
    КартинкаПечатьОрганизации.Картинка = Картинка;
    КартинкаПечатьОрганизации.Верх = 10;
    КартинкаПечатьОрганизации.Высота = 10;
    КартинкаПечатьОрганизации.Ширина = 10;
    КартинкаПечатьОрганизации.Лево = 3;
    КартинкаПечатьОрганизации.ГраницаСверху = Ложь;
    КартинкаПечатьОрганизации.ГраницаСлева = Ложь;
    КартинкаПечатьОрганизации.ГраницаСправа = Ложь;
    КартинкаПечатьОрганизации.ГраницаСнизу = Ложь;
    КартинкаПечатьОрганизации.РазмерКартинки = РазмерКартинки.АвтоРазмер;
    //ТабличныйДокумент.Вывести(ОбластьПечатьОрганизации);    

Если использовать: ТабличныйДокумент.Вывести(ОбластьПечатьОрганизации),
то, печать есть, задваивается подвал. Как отобразить картинку?
1 Lexey_
 
13.01.16
13:22
(0) РисунокТабличногоДокумента (SpreadsheetDocumentDrawing)
Расположить (Place)
Синтаксис:

Расположить(<ОбластьЯчеек>)
Параметры:

<ОбластьЯчеек> (обязательный)

Тип: ОбластьЯчеекТабличногоДокумента.
Область, в которой будет расположен рисунок.
Описание:

Помещает рисунок в указанной области ячеек табличного документа.
2 LordCMEPTb
 
13.01.16
13:30
Есть предложение добавлять картинку не к области, которая представляет из себя отдельный табличный документ, а самому документу, т.е. вместо:

  КартинкаПечатьОрганизации = ОбластьПечатьОрганизации.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);

писать что-то вроде:

КартинкаПечатьОрганизации = ТабличныйДокумент.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);

Ну или при заполнении области подвала создавать картинку.
3 iva77ru
 
13.01.16
14:03
Задача в том, чтобы не вмешиваться в конфигурацию и сохранить алгоритм построения формы типовой. Поэтому, Расположить - то, что нужно. Но форма в БП 3.0 настолько кривая, что невозможно пропорционально выделить область, с тем, чтобы получить пропорциональную картинку. Придется удалять "Подвал" из готовой формы, а затем, добавлять свой.
Спасибо, за помощь!
4 LordCMEPTb
 
13.01.16
14:20
(3) Просто интересно, а чем не понравилось просто вставить картинку без удаления подвала?
5 iva77ru
 
13.01.16
14:21
Можно, оказывается. Можно задать любую область, хоть 1 ячейку, а затем вытягивать рисунок по ширине и высоте.

    КартинкаПечатьОрганизации = ТабличныйДокумент.Рисунки[Индекс];
    КартинкаПечатьОрганизации.Ширина = 60;
    КартинкаПечатьОрганизации.Высота = 45;