Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 2
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> Рисунок в макeте          
alexkhua Подменю пользователя
сообщение 15.11.12, 23:01
Сообщение #1

Завсегдатай
****
Группа: Пользователи
Сообщений: 181
Спасибо сказали: 2 раз
Рейтинг: 0

Не подскажите с чего начать? Нужно в макете разместить рисунок товара который бы менялся в зависимости от вида товара.

Не пойму как в макете разместить рисунок (поле и ссылку на рисунок , ноходящийся на локальном диски в конкретном катологе.)

AnryMc Подменю пользователя
сообщение 16.11.12, 8:17
Сообщение #2

Оратор
Иконка группы
Группа: Местный
Сообщений: 334
Спасибо сказали: 96 раз
Рейтинг: 97.6

Google.com - никто не отменял:
[необходимо зарегистрироваться для просмотра ссылки]

Например хорошая статья:
[необходимо зарегистрироваться для просмотра ссылки]

А если кратко:
Картинка = Новый Картинка(Файл.ПолноеИмя);
                
ОбластьМакета = Макет.ПолучитьОбласть("Фото");
ОбластьМакета.Рисунки.Фото1.Картинка = Картинка;
ТабДок.Вывести(ОбластьМакета);


Сообщение отредактировал Vofka - 16.11.12, 9:07
Причина редактирования: Выделяйте, пожалуйста, код.

alexkhua Подменю пользователя
сообщение 16.11.12, 9:32
Сообщение #3

Завсегдатай
****
Группа: Пользователи
Сообщений: 181
Спасибо сказали: 2 раз
Рейтинг: 0

Спасибо, попробую.

Meest Подменю пользователя
сообщение 16.11.12, 11:15
Сообщение #4

Завсегдатай
Иконка группы
Группа: Местный
Сообщений: 170
Из: Украина
Спасибо сказали: 32 раз
Рейтинг: 0

Цитата(AnryMc @ 16.11.12, 8:17) *
Google.com - никто не отменял:
[необходимо зарегистрироваться для просмотра ссылки]

Например хорошая статья:
[необходимо зарегистрироваться для просмотра ссылки]

А если кратко:
Картинка = Новый Картинка(Файл.ПолноеИмя);
                
ОбластьМакета = Макет.ПолучитьОбласть("Фото");
ОбластьМакета.Рисунки.Фото1.Картинка = Картинка;
ТабДок.Вывести(ОбластьМакета);


ИХМО
Как по мне не совсем удобный вариант для хранения и создания картинок, которые должны на постоянно основе выводится на печатною форму.
Во многих типовых конфигурациях есть "Хранилище дополнительной информации" куда можно заливать картинки и потом без проблем присваивать их соответствующему макету.
Метод который был описан в статье [необходимо зарегистрироваться для просмотра ссылки] я рассматривал, но так как задача стояла выводить логотипы на всех представительствах компании данный метод отпал.

Так как сам веду не типовую конфигурацию, создал на подобии типового решения, плюс к этому в хранилище можно лить не только картинки но и много другое, что облегчило работу коллег по цеху по установки скриптов и малогабаритного софта.

Для получения картинки из хранилище использую следующий код;

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


P.S Не судите строго, так как сам самоучка


Vofka Подменю пользователя
сообщение 16.11.12, 11:21
Сообщение #5

У нас здесь своя атмосфера...
***********
Группа: Основатель
Сообщений: 13955
Из: Киев
Спасибо сказали: 4520 раз
Рейтинг: 3642.8

Цитата(Meest @ 16.11.12, 11:15) *
сам самоучка

По-моему 1С-ников в институтах ещё не выпускают. Так что все самоучки.

Meest Подменю пользователя
сообщение 16.11.12, 11:32
Сообщение #6

Завсегдатай
Иконка группы
Группа: Местный
Сообщений: 170
Из: Украина
Спасибо сказали: 32 раз
Рейтинг: 0

Цитата(Vofka @ 16.11.12, 11:21) *
По-моему 1С-ников в институтах ещё не выпускают. Так что все самоучки.



Я про курсы.

alexkhua Подменю пользователя
сообщение 17.11.12, 22:57
Сообщение #7

Завсегдатай
****
Группа: Пользователи
Сообщений: 181
Спасибо сказали: 2 раз
Рейтинг: 0

Ну не работает нифига. Что не так?
Процедура Печать1(ТабДок, Ссылка) Экспорт

    Макет = Документы.НарядЗаказ.ПолучитьМакет("Макет");
    Картинка= Новый Картинка ("D:\1CBase\БД\рис\ПШ квартирный.jpg");
    
    ОбластьМакета = Макет.ПолучитьОбласть("Картинка");
    
    ОбластьМакета.Рисунки.Фото1.Картинка = Картинка;
    
    ТабДок.Вывести(ОбластьМакета);
    
    
   КонецПроцедуры

alexkhua Подменю пользователя
сообщение 18.11.12, 11:21
Сообщение #8

Завсегдатай
****
Группа: Пользователи
Сообщений: 181
Спасибо сказали: 2 раз
Рейтинг: 0

Все. С выводом картинки в макет разобрался. Теперь не работает алгоритм вывода картинки.
//Алгоритм Картинка
    
    
    
    Если  ТипИзделия.Наименование="ПШ Навесной" Тогда
    Картинка= Новый Картинка ("D:\1CBase\БД\рис\ПШ квартирный.jpg");//Картинка1
     Шапка.Рисунки.Чертеж.Картинка = Картинка

    

ИначеЕсли
     ТипИзделия.Наименование="ПШ навесной две двери вер" Тогда
        
    Картинка= Новый Картинка ("D:\1CBase\БД\рис\ПШ навесной две двери вертикальные.jpg"); //Картинка2
    
    Шапка.Рисунки.Чертеж.Картинка = Картинка

    
  КонецЕсли;



ТабДок.Вывести(Шапка);


Картинка1 не работает (Хотя до установки алгоритма с условием выводилась), а картинка2 выводится.





Все решил и это. Банальная ошибка в одной букве.

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 25.04.24, 11:04
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!