Имя: Пароль:
1C
1С v8
Повернуть штрих код в макете на 90
0 Verzeragna
 
09.10.13
09:18
Конфигурация УТ 11.1.2.9. В свойствах такого нету. Подскажите как это сделать?
1 manti
 
09.10.13
09:29
(0) штрих-код уже вставлен как картинка?
2 Verzeragna
 
09.10.13
09:29
Да
3 manti
 
09.10.13
09:31
смотрю сейчас паралельно в 8.1 - вставлена картинка. Не вижу, чтобы можно было сделать ротацию или подобное. Наверное есть смысл в фотошопе переориентировать....
4 Verzeragna
 
09.10.13
09:47
А в макете никак нельзя?
5 eklmn
 
гуру
09.10.13
09:54
нет
6 Галахад
 
гуру
09.10.13
10:02
Это программировать надо...

У ВК есть метод, что-то типа угол поворота.
Его применить и ширину с высотой поменять.
7 eklmn
 
гуру
09.10.13
10:14
как вариант поставить irfanview и делать
i_view32.exe c:\*.jpg /rotate_l /convert=d:\*.jpg

/rotate_l -влево
/rotate_r -вправо
8 Verzeragna
 
09.10.13
10:41
(7) а как этим пользоваться?
9 eklmn
 
гуру
09.10.13
11:00
в смысле как?
устанавливаешь ирфан, запускаешь внешнее приложение 1с с параметрами, вставляешь повернутый файл в макет
10 eklmn
 
гуру
09.10.13
11:02
Файл = "C:\Program Files\IrfanView\i_view32.exe "+путь.НаименованиеФайла +" /rotate_l /convert=d:\111.jpg";
ЗапуститьПриложение(ИФайл);

картинка = новый картинка("d:\111.jpg");
11 Галахад
 
гуру
09.10.13
11:06
(7) Нафига, если можно стандартными методами обойтись?
12 wms
 
09.10.13
11:06
картинку и переверни
13 eklmn
 
гуру
09.10.13
11:07
(11) ну рассказывай
14 Галахад
 
гуру
09.10.13
11:08
(13) Ну в (6) же.
15 eklmn
 
гуру
09.10.13
11:10
"У ВК есть метод" - поподробней
16 Галахад
 
гуру
09.10.13
11:15
Щас, конфигуратор открою.
17 Галахад
 
гуру
09.10.13
11:22
(15) Вот так, например.

Функция ПолучитьКартинкуШтрихкода(ПараметрыШтрихкода) Экспорт
    
    ВнешняяКомпонента = МенеджерОборудованияСерверПовтИсп.ПодключитьВнешнююКомпонентуПечатиШтрихкода();
    
    Если ВнешняяКомпонента = Неопределено Тогда
        ВызватьИсключение НСтр("ru = 'Ошибка подключения внешней компоненты печати штрихкода!'");
    КонецЕсли;
    
    //{
    ВнешняяКомпонента.УголПоворота = 90;
    // Зададим размер картинки
    ВнешняяКомпонента.Ширина = Окр(ПараметрыШтрихкода.Высота);
    ВнешняяКомпонента.Высота = Окр(ПараметрыШтрихкода.Ширина);
    //ВнешняяКомпонента.Ширина = Окр(ПараметрыШтрихкода.Ширина);
    //ВнешняяКомпонента.Высота = Окр(ПараметрыШтрихкода.Высота);
    //}
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс