Определить размер изображения в пикселях

Форум Программирование Общие вопросы программирования (Dev)

8.3.14

1. user1619761 02.06.22 12:17 Сейчас в теме

Доброго времени суток. Есть макет с картинкой штрихкода. В макете картинка имеет размер 132на132 пикселя(3.5х3.5см). Указываю в параметрах этот же самый размер, но на печать выводится штрихкод меньшего размера. Подскажите, пожалуйста, как определить, какие размеры прописать в параметры, чтоб нормально выводился?

ПараметрыШтрихкода.Вставить("Ширина",          132);
        ПараметрыШтрихкода.Вставить("Высота",          132);

Прикрепленные файлы:

По теме из базы знаний

Найденные решения

2. parker_j 02.06.22 12:35 Сейчас в теме

(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;
    
    Параметры.Вставить("КоличествоМиллиметровВПикселе", КоличествоМиллиметровВПикселе);
    
    Возврат Параметры;
    
КонецФункции

Показать

Остальные ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. parker_j 02.06.22 12:35 Сейчас в теме

(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;
    
    Параметры.Вставить("КоличествоМиллиметровВПикселе", КоличествоМиллиметровВПикселе);
    
    Возврат Параметры;
    
КонецФункции

Показать

3. user1619761 02.06.22 12:44 Сейчас в теме

(2) спасибо!

Оставьте свое сообщение

E-mail: