8.х Как добавить фото в печатную форму?

Тема в разделе "Общие вопросы "1С:Предприятие 8"", создана пользователем AlexxGor, 5 апр 2012.

  1. TopicStarter Overlay
    AlexxGor
    Offline

    AlexxGor

    Регистрация:
    5 апр 2012
    Сообщения:
    3
    Симпатии:
    0
    Баллы:
    1
    Здравствуйте!У меня 8.2 тонкий клиент (управляемые формы). Печатаю карточку сотрудника. Подскажите как вставить в макет фото с элемента справочника?
  2. alexburn
    Offline

    alexburn Модераторы Команда форума Модератор

    Регистрация:
    5 янв 2009
    Сообщения:
    14.781
    Симпатии:
    509
    Баллы:
    204
    Посмотрите в инете, как выводить картинку в печатную форму. Или вам код написать?
  3. TopicStarter Overlay
    AlexxGor
    Offline

    AlexxGor

    Регистрация:
    5 апр 2012
    Сообщения:
    3
    Симпатии:
    0
    Баллы:
    1
    ну если можно. Я получаю фото в элементе справочника с ХранилищаЗначения, с помощью ПолучитьНавигационнуюСсылку. А инфы много, но что-то все не для управляемых форм.
  4. alexburn
    Offline

    alexburn Модераторы Команда форума Модератор

    Регистрация:
    5 янв 2009
    Сообщения:
    14.781
    Симпатии:
    509
    Баллы:
    204
    Могу только как пример, небольшой отрывок.
  5. TopicStarter Overlay
    AlexxGor
    Offline

    AlexxGor

    Регистрация:
    5 апр 2012
    Сообщения:
    3
    Симпатии:
    0
    Баллы:
    1
    давайте

    где-нибудь можно вообще скачать на управляемых формах например конфигурацию "управление персонала". Там наверняка есть это.
  6. alexburn
    Offline

    alexburn Модераторы Команда форума Модератор

    Регистрация:
    5 янв 2009
    Сообщения:
    14.781
    Симпатии:
    509
    Баллы:
    204
    У меня прайс с картинками имеется в наличии, но там на СКД закручено все. Кстати, уточните еще платформу, и пишите ли для управляемых форм.

    Вот, нарыл кусочек:
    Код:
    Путь = КаталогВременныхФайлов()+ "\1С_Картинка_"+Формат(ТекущаяДата(),"ДФ=yyyyMMddЧЧммсс")+".bmp";
    КартинкаВПамяти = Выборка.Изображение.Получить();
    КартинкаВПамяти.Записать(Путь);
    Рисунок = ОбластьКартинки.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
    Рисунок.Картинка = Новый Картинка(Путь);
    Рисунок.Расположить(ОбластьКартинки.Область("R1C2:R11C7"));//вот тут вы располагаете саму картинку на макете
    Но это как пример. Разбирайтесь:)

    Вот еще один пример, нашел в инете:
    Код:
     // 1-й вариант
    //Как вывести картинку в табличный документ?
    
    ТабДок = Новый ТабличныйДокумент;
    Макет = ОбработкаОбъект.ПолучитьМакет("Макет");
    ОбластьКартинки = Макет.ПолучитьОбласть("ОбластьСКартинкой");
    Картинка = Новый Картинка(ПутьККартинке);
    
    // Элемент управления "Логотип" входит в коллекцию картинок области.
    ОбластьКартинки.Рисунки.Логотип.Картинка = Картинка;
    ТабДок.Вывести(ОбластьКартинки);
    
    ТабДок.Показать();
    
    // 2-й вариант
    //Как вывести картинку в табличный документ без изменения макета?
    
    Область = Макет.ПолучитьОбласть("Шапка");
    Рисунок = Область.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
    Рисунок.Верх = 5;
    Рисунок.Высота = 10;
    Рисунок.Ширина = 10;
    Рисунок.Лево = 5;
    Рисунок.Картинка = Новый Картинка(ПутьККартинке);
    Рисунок.РазмерКартинки = РазмерКартинки.РеальныйРазмер;
    
    ТабДок.Вывести(Область);
    
    //3-й вариант
    //ПечатьОрганизации , добавляем в макет картинку с именем Картинка1 в самую нижнюю
    //область с именем ОбластьПечатьОрганизации
    ОбластьПечатьОрганизации = Макет.ПолучитьОбласть("ПечатьОрганизации");
    Картинка= Новый Картинка("C:\files\img\печатьОрганизации.gif") ;
    ОбластьПечатьОрганизации.Рисунки.Картинка1.Картинка = картинка;
    ТабДок.Вывести(ОбластьПечатьОрганизации);
    
    // 4-й вариант динамически
    ОбластьПечатьОрганизации = Макет.ПолучитьОбласть("ПечатьОрганизации");
    КартинкаПечатьОрганизации = ОбластьПечатьОрганизации.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Картинка);
    КартинкаПечатьОрганизации.Картинка = БиблиотекаКартинок.ОбщаяКартинка1;
    КартинкаПечатьОрганизации.Верх = 0;
    КартинкаПечатьОрганизации.Высота = 80;
    КартинкаПечатьОрганизации.Ширина = 80;
    КартинкаПечатьОрганизации.Лево = 50;
    КартинкаПечатьОрганизации.ГраницаСверху = Ложь;
    КартинкаПечатьОрганизации.ГраницаСлева = Ложь;
    КартинкаПечатьОрганизации.ГраницаСправа = Ложь;
    КартинкаПечатьОрганизации.ГраницаСнизу = Ложь;
    КартинкаПечатьОрганизации.РазмерКартинки = РазмерКартинки.АвтоРазмер;
    ТабДок.Вывести(ОбластьПечатьОрганизации);
    
    //5-й вариант получение картинки из хранилища значений
    // Выборка.Изображение - выборка из запроса, Изображение реквизит -хранил. значений 
    Попытка
    Путь = КаталогВременныхФайлов()+ "\1С_Картинка_"+Формат(ТекущаяДата(),"ДФ=yyyyMMddЧЧммсс")+".bmp";
    КартинкаВПамяти = Выборка.Изображение.Получить();
    КартинкаВПамяти.Записать(Путь);
    ОбластьСостав.Рисунки.D1.Картинка = Новый Картинка(Путь);
    Исключение
    ОбластьСостав.Рисунки.D1.Картинка = Новый Картинка;
    КонецПопытки;

Поделиться этой страницей