|
|
Печать Штрих-Кода (управляемое приложение) |
☑ |
|
0
poskotinov_av
17.08.17
✎
17:18
|
Здравствуйте, подскажите как вывести на печать штрих-код в макете на клиенте, если шрифт, которым формируем изображение - только на сервере?
|
|
|
1
Heckfy
17.08.17
✎
17:19
|
Формируй весь табличный документ на сервере и потом передавай на клиента.
|
|
|
2
poskotinov_av
17.08.17
✎
17:32
|
Можно пример?
|
|
|
3
poskotinov_av
17.08.17
✎
17:36
|
сейчас это выглядит так:
на клиенте:
ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть("Детали");
Рисунок = ОбластьДетальныхЗаписей.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Текст);
Рисунок.Верх = 10;
Рисунок.Лево = 10;
Рисунок.Ширина = 300;
Рисунок.Высота = 20;
Рисунок.ГоризонтальноеПоложение = ГоризонтальноеПоложение.Центр;
Рисунок.ВертикальноеПоложение = ВертикальноеПоложение.Центр;
ОбщийМодульСервер.СгенеритьШК(Рисунок, "6546546846");
&НаСервере
Функция СгенеритьШК(Рисунок, ТекстШК) экспорт
Рисунок.Шрифт = Новый Шрифт ("Code39",20,Истина); Рисунок.Текст = ТекстШК;
КонецФункции
так вот на клиенте не отображается шрифт...
|
|
|
4
poskotinov_av
17.08.17
✎
17:37
|
видимо надо сгенерить картинку на сервере, передать ее клиенту, чтобы тот сам ее в макет вставил... как это сделать?
|
|
|
5
Heckfy
17.08.17
✎
17:41
|
Каша малаша какая то......
|
|
|
6
poskotinov_av
17.08.17
✎
18:01
|
(5) ну мне это особо не помогло в решении поставленной задачи, есть еще варианты?
|
|
|
7
Heckfy
17.08.17
✎
18:06
|
Не понятно, как вы макет на клиенте получили.... Ну да ладно...
"
видимо надо сгенерить картинку на сервере, передать ее клиенту, чтобы тот сам ее в макет вставил... как это сделать?
"
Подозреваю, что как то так:
ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть("Детали");
Рисунок = ОбластьДетальныхЗаписей.Рисунки.Добавить(ТипРисункаТабличногоДокумента.Текст);
Рисунок.Верх = 10;
Рисунок.Лево = 10;
Рисунок.Ширина = 300;
Рисунок.Высота = 20;
Рисунок.ГоризонтальноеПоложение = ГоризонтальноеПоложение.Центр;
Рисунок.ВертикальноеПоложение = ВертикальноеПоложение.Центр;
Рисунок=ОбщийМодульСервер.СгенеритьШК(Рисунок, "6546546846");
&НаСервере
Функция СгенеритьШК(Рисунок, ТекстШК) экспорт
Рисунок.Шрифт = Новый Шрифт ("Code39",20,Истина); Рисунок.Текст = ТекстШК;
Возврат Рисунок;
КонецФункции
|
|
|
8
poskotinov_av
17.08.17
✎
19:40
|
(7) таким образом клиент его рисует своим (отсутствующим) шрифтом
|
|
