Имя: Пароль:
1C
1С v8
Печать штрихкода в УФ. Помогла установка драйвера 1СПечать штрихкодов (ActiveX) версия 8.0.16.4
0 Fomania
 
02.05.12
22:07
Не получается вывести картинку штрихкода на экран. На макет добавила рисунок объекта 1CBarCode, вот как пытаюсь обращаться:

ОбластьШтрихкод = Макет.ПолучитьОбласть("ОбластьШтрихкод");
СтрокаШК = ПолучитьШтрихКодОбъекта(ТекДокумент);
ОбластьШтрихкод.Рисунки.Штрихкод.Объект.ТипКода = 1;
ОбластьШтрихкод.Рисунки.Штрихкод.Объект.Сообщение = СтрокаШК;
РезДок.Вывести(ОбластьШтрихкод);

на строке ТипКода = 1 вылетает, выдает такую ошибку:

{Документ.ПоступлениеИнвестиций.Команда.Печать.МодульКоманды(29)}: Значение не является значением объектного типа (ТипКода)
   ОбластьШтрихкод.Рисунки.Штрихкод.Объект.ТипКода = 1;

В чем может быть причина? Подглядела в ут 10.3, как там это делается. Вроде код там на мой похож. Но там обычные формы, а у меня управляемые. Может быть в этом какая-то загвоздка? В ут 11 так и не разобралась, как шк выводятся, как-то там замудрено все..
1 ДенисЧ
 
02.05.12
22:10
А отладчик что говорит? А СП о доступности?
2 Fomania
 
02.05.12
22:14
(1) отладчик доходит до этого места и дальше вылетает, ошибку я описала.. что еще я могу у отладчика спросить?
и что такое СП?..
3 ДенисЧ
 
02.05.12
22:15
(2)
а) в отладчике перед этой строкой посмотри значения и типы твоих выражений.
б) http://www.forum.mista.ru/rules.php#dict
4 zak555
 
02.05.12
22:16
фотко
5 Fomania
 
02.05.12
22:20
(3) ОбластьШтрихкод.Рисунки.Штрихкод.Объект - это отладчик определяет как тип РисунокТабличногоДокумента, а вот ОбластьШтрихкод.Рисунки.Штрихкод.Объект.ТипКода уже пишет Значение не является значением объектного типа
6 ДенисЧ
 
02.05.12
22:21
(5) Вот и ответ. У рисунка табличного документа нет реквизита ТипКода.
7 Fomania
 
02.05.12
22:25
(6) А как это срабатывает в ут 10.3? Там рисунок штрихкода на макете тоже типа "рисунок". Я пробовала изменять тип объекта на Элемент управления «1С: Печать штрихкодов», но когда запускаю отладчик, потом смотрю - в макете снова "Рисунок"
8 Fomania
 
02.05.12
22:50
В ут10.3 ЭтикеткаОбласть.Рисунки.Штрихкод.Объект имеет тип ActiveX. Почему мой объект не такого типа? Где это задается?
9 IamAlexy
 
02.05.12
22:51
(0) подгляди как это делается в БСП или в демке что с платформой поставляется.
там НЕ так как в УТ10.3
там подругому
10 Fomania
 
03.05.12
06:14
(9) установила БСП, но про штрихкоды там вообще не нашла... Подскажи где смотреть пожалуйста
11 Fomania
 
03.05.12
07:53
АП
неужели ни у кого подобной проблемы не возникало?..
12 Fomania
 
03.05.12
09:29
АП
13 V_V_V
 
04.05.12
16:23
(11) Возникало... Как раз сам наступил...
По мне, так это из-за того что пытаешься выполнять код на сервере. И на нем Объект со своими свойствами недоступен. А сделать на Клиенте и втиснуть в Табличный документ еще не придумал как.
Ща ковыряюсь в Управлении небольшой фирмой. Из той мути, что там наворочено, выходит что штрих-код формируется в картинку и передается на сервер через временное хранилище. Но как - еще не разобрался до конца...
14 Diman000
 
04.05.12
16:40
В УФ все по-другому. Там этикетка с ШК это сформированная картинка. Внешняя компонента ее формирует.
Я перетаскивал код из УТ 11, сейчас уже деталей не вспомню, но смотреть надо в сторону ОМ "ФормированиеПечатныхФорм" и "ШтрихкодированиеСервер".
Сам код должен выглядеть примерно так:

КартинкаШК = ПолучитьКартинкуШтрихкодаДокумента(МойКод);
ОбластьШК = Макет.ПолучитьОбласть("ОбластьШтрихкода");
ОбластьШК.Рисунки.Штрихкод.Картинка = КартинкаШК;
ТабличныйДокумент.Вывести(ОбластьШК);

Функцию ПолучитьКартинкуШтрихкодаДокумента найдешь в УТ 11
15 Diman000
 
04.05.12
16:41
И еще общие макеты надо выдернуть. КомпонентаПечатиШтрихкодовWindows32, итд.
16 Diman000
 
04.05.12
16:45
Вот и наврал)
ПолучитьКартинкуШтрихкодаДокумента это мое творение. В УТ есть ПолучитьКартинкуШтрихкода(). Используется примерно так:

ПараметрыШтрихкода = Новый Структура("Ширина, Высота, ТипКода, ОтображатьТекст, РазмерШрифта, Штрихкод", 100, 50, 4, Истина, 12, Штрихкод);
КартинкаШК = ШтрихкодированиеСервер.ПолучитьКартинкуШтрихкода(Компонента, ПараметрыШтрихкода);
AdBlock убивает бесплатный контент. 1Сергей