Гость
Форумы / [игнор отключен] [закрыт для гостей] / Как вывести штрих-код в табличный документ / 13 сообщений из 13, страница 1 из 1
20.12.2016, 15:43
    #39371137
FBoris
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести штрих-код в табличный документ
Добрый день, помогите пожалуйста. Хочу вывести штрихкод в документе, ругается на строке
ШК = ТабличныйДокумент.Рисунки.Добавить(КомпонентШК);

{ОбщаяКоманда.ОбщаяКоманда1.МодульКоманды(10)}: Ошибка при вызове метода контекста (Добавить)
ШК = ТабличныйДокумент.Рисунки.Добавить(КомпонентШК);
по причине:
Несоответствие типов (параметр номер '1')
Так же точно например добавляется диаграмма и все работает или в корне неправильно делаю со штрих-кодом?



&НаКлиенте
Процедура ОбработкаКоманды(ПараметрКоманды, ПараметрыВыполненияКоманды)
ТабличныйДокумент = новый ТабличныйДокумент();
Попытка КомпонентШК = Новый COMОбъект("V8.Barcod");
Исключение // Элемент управления не установлен
КомпонентШК = Неопределено;
КонецПопытки;


ШК = ТабличныйДокумент.Рисунки.Добавить(КомпонентШК);
ШК.Расположить(ТабличныйДокумент.Область("R1C1:R24C10"));

ТабличныйДокумент.Показать();
КонецПроцедуры
...
Рейтинг: 0 / 0
20.12.2016, 19:47
    #39371336
Программист 1с
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести штрих-код в табличный документ
ТипКода = 4;
ШтрихКод = "1111111111111";

Попытка
КомпонентШК = Новый COMОбъект("V8.Barcod");
Исключение
Сообщить("Ошибка подключения компаненты <1С:Печать штрих-кодов>");
Возврат;
КонецПопытки;

Попытка
КомпонентШК.ТипКода = ТипКода;
КомпонентШК.Сообщение = ШтрихКод;
КомпонентШК.ОтображатьТекст = Ложь;
Исключение
Сообщить("Ошибка печати");
Возврат;
КонецПопытки;

ТабДок = Новый ТабличныйДокумент;
ОбластьШК = Макет.ПолучитьОбласть(1,1,5,5);

ОбластьШК.Рисунки.Штрихкод.Объект.ТипКода = КомпонентШК.ТипКода;
ОбластьШК.Рисунки.Штрихкод.Объект.Сообщение = КомпонентШК.Сообщение;
ОбластьШК.Рисунки.Штрихкод.Объект.ОтображатьТекст = КомпонентШК.ОтображатьТекст


Как вариант добавить сначала просто картинку, а потом уже

ОбластьШК.Рисунки.Штрихкод.Объект= КомпонентШК
...
Рейтинг: 0 / 0
29.12.2016, 09:58
    #39377419
FBoris
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести штрих-код в табличный документ
Пишет что нет такого...
ОбластьШК.Рисунки.Штрихкод
...
Рейтинг: 0 / 0
29.12.2016, 14:53
    #39377714
Владимир Лазурко
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести штрих-код в табличный документ
FBorisПишет что нет такого...
ОбластьШК.Рисунки.ШтрихкодЗначит в макете в выбранной области нет рисунка (объекта) с наименованием "Штрихкод"
...
Рейтинг: 0 / 0
30.12.2016, 11:08
    #39378184
FBoris
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести штрих-код в табличный документ
Так у меня в том и вопрос, что надо динамически сформировать штрихкод и добавить в отчет.
...
Рейтинг: 0 / 0
30.12.2016, 13:17
    #39378265
Программист 1с
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести штрих-код в табличный документ
FBorisПишет что нет такого...
ОбластьШК.Рисунки.ШтрихкодОбластьШК.Рисунки. Там что-то "Установитьобъект" или тому подобное. (Открой хелп - не помню точно)

То есть добавляете сначала рисунок программно, а потом уже устанавливаете связку c штрихкодом.
...
Рейтинг: 0 / 0
30.12.2016, 14:28
    #39378326
FBoris
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести штрих-код в табличный документ
Программист 1сFBorisПишет что нет такого...
ОбластьШК.Рисунки.ШтрихкодОбластьШК.Рисунки. Там что-то "Установитьобъект" или тому подобное. (Открой хелп - не помню точно)

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

Ну вообще-то тему и создал для того, чтобы узнать как можно добавленную картинку подменить потом на объект со штрих-кодом.
...
Рейтинг: 0 / 0
31.12.2016, 19:29
    #39378661
Программист 1с
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести штрих-код в табличный документ
РисунокТабличногоДокумента.УстановитьЭлементУправления (SpreadsheetDocumentDrawing.SetControl)
РисунокТабличногоДокумента (SpreadsheetDocumentDrawing)
УстановитьЭлементУправления (SetControl)
Синтаксис:

УстановитьЭлементУправления(<ТипЭлементаУправления>)
Параметры:

<ТипЭлементаУправления> (обязательный)

Тип: Тип.
Задает тип элемента управления, который устанавливается.
Описание:

Устанавливает элемент управления для редактирования значения рисунка типа "Текст".

Доступность:

Сервер, толстый клиент, внешнее соединение.
Примечание:

Применяется только для рисунков типа Текст. Доступно, если свойство СодержитЗначение равно Истина.
--------------------------------------------------------------------------------

Методическая информация
...
Рейтинг: 0 / 0
07.01.2017, 15:37
    #39380325
Мурзик2017
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести штрих-код в табличный документ
Компонента 1С:Печать штрих-кодов установлена?
http://its.1c.ru/db/metod8dev#content:1838:hdoc
...
Рейтинг: 0 / 0
09.01.2017, 15:59
    #39380923
FBoris
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести штрих-код в табличный документ
Компонента установлена, она нормально создается
Вот что получается:

&НаКлиенте
Процедура ОбработкаКоманды(ПараметрКоманды, ПараметрыВыполненияКоманды)

ТабличныйДокумент = новый ТабличныйДокумент();
Попытка КомпонентШК = Новый COMОбъект("V8.Barcod");
Исключение // Элемент управления не установлен
КомпонентШК = Неопределено;
КонецПопытки;


ШК = ТабличныйДокумент.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Объект);
ШК.Расположить(ТабличныйДокумент.Область("R1C1:R24C10"));
ШК.УстановитьЭлементУправления(КомпонентШК);

ТабличныйДокумент.Показать();

КонецПроцедуры


Ругается на ШК.УстановитьЭлементУправления(КомпонентШК); пишет несоотвествие типов. Что дальше попробовать?
...
Рейтинг: 0 / 0
09.01.2017, 22:44
    #39381134
Программист 1с
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести штрих-код в табличный документ
Значит надо:

Т=ТабличныйДокумент.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Объект);

А вот дальше...
Может так:

Т.Объект= КомпонентШК ?
или


Т.Объект.Установить(КомпонентШК) ?



ДобавитьТипРисункаТабличногоДокумента (SpreadsheetDocumentDrawingType)
ТипРисункаТабличногоДокумента (SpreadsheetDocumentDrawingType)
Значения

ГеографическаяСхема (GeographicalSchema)
Группа (Group)
Дендрограмма (Dendrogram)
Диаграмма (Chart)
ДиаграммаГанта (GanttChart)
Картинка (Picture)
Объект (Object)
Примечание (Comment)
Прямая (Line)
Прямоугольник (Rectangle)
СводнаяДиаграмма (PivotChart)
Текст (Text)
Эллипс (Ellipse)

Описание:

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

Доступность:

Тонкий клиент, веб-клиент, сервер, толстый клиент, внешнее соединение, мобильное приложение(клиент).
Возможен обмен с сервером. Сериализуется. Данный объект может быть сериализован в/из XDTO. Тип XDTO, соответствующий данному объекту, определяется в пространстве имен http://v8.1c.ru/8.2/data/spreadsheet. Имя типа XDTO: SpreadsheetDocumentDrawingType.
См. также:

РисунокТабличногоДокумента, свойство ТипРисунка
КоллекцияРисунковТабличногоДокумента, метод Добавить

--------------------------------------------------------------------------------

Методическая информация



ТипРисункаТабличногоДокумента.Объект (SpreadsheetDocumentDrawingType.Object)
ТипРисункаТабличногоДокумента (SpreadsheetDocumentDrawingType)
Объект (Object)
Описание:

OLE объект.
--------------------------------------------------------------------------------

Методическая информация



ОбъектТипРисункаТабличногоДокумента.Объект (SpreadsheetDocumentDrawingType.Object)
ТипРисункаТабличногоДокумента (SpreadsheetDocumentDrawingType)
Объект (Object)
Описание:

OLE объект.
--------------------------------------------------------------------------------

Методическая информация


ТипРисункаТабличногоДокумента.Объект (SpreadsheetDocumentDrawingType.Object)
ТипРисункаТабличногоДокумента (SpreadsheetDocumentDrawingType)
Объект (Object)
Описание:

OLE объект.
--------------------------------------------------------------------------------

Методическая информация
...
Рейтинг: 0 / 0
10.01.2017, 08:46
    #39381223
FBoris
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести штрих-код в табличный документ
Т=ТабличныйДокумент.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Объект);

А вот дальше...
Может так:

Т.Объект= КомпонентШК ?

{ОбщаяКоманда.ОбщаяКоманда1.МодульКоманды(13)}: Поле объекта недоступно для записи (Объект)

или

Т.Объект.Установить(КомпонентШК) ?

{ОбщаяКоманда.ОбщаяКоманда1.МодульКоманды(13)}: Значение не является значением объектного типа (Установить)


Как-то так, уже все перепробовал, а где этот мостик чтобы рисунку подсунуть объект непонятно.
...
Рейтинг: 0 / 0
10.01.2017, 14:24
    #39381514
Программист 1с
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как вывести штрих-код в табличный документ
Т.Объект.Добавить(КомпонентШК) ?

Какой-то мостик должен быть.
...
Рейтинг: 0 / 0
Форумы / [игнор отключен] [закрыт для гостей] / Как вывести штрих-код в табличный документ / 13 сообщений из 13, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]