Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
21 ноя 2024, 14:01

1c8.1 и addin_libtelnet.dll для pos принтера чеков

Автор Deer, 13 окт 2011, 16:14

0 Пользователей и 1 гость просматривают эту тему.

Deer

Добрый день.
Срочно стала задача подключить 1с8.1 (конфигурация переработана) к pos принтеру POS88 .

То что я зделал и что не удалось.

1.Зарегестрировал бибилиотеку addin_libtelnet.dll в win.
2.прописал подключение в 1с - все норм.
3.написал текст для передачи на принтер.

Объект1.Connect_sync(СокрЛП(АйПиПринтера),9100,5000);
Если Объект1.GetActiveStatus() = 1 Тогда
Объект1.SetAsyncMode(1);// mode_read_event_only
Объект1.ClearErrorsList();
Объект1.SetFilterMode(2);//esc/pos
Объект1.SetServerCharEncoding("ibm866");
Объект1.Send("29 76 0 0");
ЛЖ =(" ESC 't' 0x07 ESC 'R' 0x00 ESC 'G' 0x01 '");
П = ("' LF ESC 'G' 0x00 ");

СП = ("Текстдля печати"); (длина по чеку проверена = 36)


Объект1.Send(ЛЖ + Сп + П);
Объект1.Send("29 86 66 20");
Объект1.Send("27 112 0 48 251");
Объект1.Disconnect();

Принтер - самообрезает ленту в конце.
При выводе текста в блокнот - все норм, соблюдены количество символов по ширине строки и тд.
тоесть выводит в блокнот отлично.

ПРОБЛЕМЫ..
1)
Печатает не доконца текст ( причем зависимости в каком месте прекращает печатать 1)
1 - длинный текст прекращает печатать почти в конце - остается 3 строки.
а короткий - прекращает печатать чуть выше - остается 4-5 строк до конца текста.
2) Не обрезает ленту в конце (я так понимаю из-за того ,что тектс не весь напечатан.
причем иногда бросает часть текста над шапкой.

Вопрос. Я не силен в пос принтерах - вход-выход в принтер мне подсказали Но тот человек сидит в 1с7.7
Прошу подсказать в какую сторонц мне копать,где искать причины, (где собака зарылась)

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск