Определить размер изображения в пикселях
Доброго времени суток. Есть макет с картинкой штрихкода. В макете картинка имеет размер 132на132 пикселя(3.5х3.5см). Указываю в параметрах этот же самый размер, но на печать выводится штрихкод меньшего размера. Подскажите, пожалуйста, как определить, какие размеры прописать в параметры, чтоб нормально выводился?
ПараметрыШтрихкода.Вставить("Ширина", 132);
ПараметрыШтрихкода.Вставить("Высота", 132);
Прикрепленные файлы:
По теме из базы знаний
- Управляемая форма, работа с изображением с помощью ActiveX.
- Групповая обработка изображений
- Программное формирование картинки в 1С:Предприятие 8.3.9 (ПотокВПамяти / ЗаписьДанных)
- Генерация QR кода для любых конфигураций 1С (обычные и управляемые формы)
- Оптимизация размера изображений из присоединенных файлов УТ 11.4
Найденные решения
(1) Модуль менеджера.ШтрихкодыУпаковокТоваров
КоличествоМиллиметровВПикселе = ПараметрыМакетовДляПечати.КоличествоМиллиметровВПикселе;
ПараметрыШтрихкода = Новый Структура;
ПараметрыШтрихкода.Вставить("Ширина", Окр(Рисунок.Ширина / КоличествоМиллиметровВПикселе));
ПараметрыШтрихкода.Вставить("Высота", Окр(Рисунок.Высота / КоличествоМиллиметровВПикселе));
ПараметрыШтрихкода.Вставить("Штрихкод", СокрЛП(ШтрихкодДляКомпоненты));
ПараметрыШтрихкода.Вставить("ТипВходныхДанных", 0); // Штрихкод - это строка
ПараметрыШтрихкода.Вставить("ТипКода", ТипКода);
ПараметрыШтрихкода.Вставить("ОтображатьТекст", ОтображатьТекст);
..................................................................................................................................................................................................
Функция ПараметрыМакетовДляПечати() Экспорт
Параметры = Новый Структура;
Параметры.Вставить("Макет_SSCC", УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.SSCC"));
Параметры.Вставить("Макет_Code128Формат1", УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.Code128Формат1"));
Параметры.Вставить("Макет_Code128Формат2", УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.Code128Формат2"));
Параметры.Вставить("Макет_Code128Формат3", УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.Code128Формат3"));
Параметры.Вставить("Макет_GS1_128", УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.GS1_128"));
Параметры.Вставить("Макет_DataBar", УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.GS1DataBarExpandedStacked"));
Параметры.Вставить("Макет_PDF417", УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.PDF417"));
Параметры.Вставить("Макет_QR", УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.QR"));
Эталон = УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.Эталон");
КоличествоМиллиметровВПикселе = Эталон.Рисунки.Квадрат100Пикселей.Высота / 100;
Параметры.Вставить("КоличествоМиллиметровВПикселе", КоличествоМиллиметровВПикселе);
Возврат Параметры;
КонецФункции
ПоказатьОстальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(1) Модуль менеджера.ШтрихкодыУпаковокТоваров
КоличествоМиллиметровВПикселе = ПараметрыМакетовДляПечати.КоличествоМиллиметровВПикселе;
ПараметрыШтрихкода = Новый Структура;
ПараметрыШтрихкода.Вставить("Ширина", Окр(Рисунок.Ширина / КоличествоМиллиметровВПикселе));
ПараметрыШтрихкода.Вставить("Высота", Окр(Рисунок.Высота / КоличествоМиллиметровВПикселе));
ПараметрыШтрихкода.Вставить("Штрихкод", СокрЛП(ШтрихкодДляКомпоненты));
ПараметрыШтрихкода.Вставить("ТипВходныхДанных", 0); // Штрихкод - это строка
ПараметрыШтрихкода.Вставить("ТипКода", ТипКода);
ПараметрыШтрихкода.Вставить("ОтображатьТекст", ОтображатьТекст);
..................................................................................................................................................................................................
Функция ПараметрыМакетовДляПечати() Экспорт
Параметры = Новый Структура;
Параметры.Вставить("Макет_SSCC", УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.SSCC"));
Параметры.Вставить("Макет_Code128Формат1", УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.Code128Формат1"));
Параметры.Вставить("Макет_Code128Формат2", УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.Code128Формат2"));
Параметры.Вставить("Макет_Code128Формат3", УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.Code128Формат3"));
Параметры.Вставить("Макет_GS1_128", УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.GS1_128"));
Параметры.Вставить("Макет_DataBar", УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.GS1DataBarExpandedStacked"));
Параметры.Вставить("Макет_PDF417", УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.PDF417"));
Параметры.Вставить("Макет_QR", УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.QR"));
Эталон = УправлениеПечатью.МакетПечатнойФормы("Справочник.ШтрихкодыУпаковокТоваров.Эталон");
КоличествоМиллиметровВПикселе = Эталон.Рисунки.Квадрат100Пикселей.Высота / 100;
Параметры.Вставить("КоличествоМиллиметровВПикселе", КоличествоМиллиметровВПикселе);
Возврат Параметры;
КонецФункции
Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот