Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> Укрощение ECS/POS принтера          
Zink Подменю пользователя
сообщение 22.04.12, 10:44
Сообщение #1

Общительный
**
Группа: Пользователи
Сообщений: 23
Спасибо сказали: 0 раз
Рейтинг: 0

Хочу сделать обработку для печати этикетки на принтере citizen, им можно управлять при помощи esc-последовательностей, например: чтоб выбрать кодировку cp866 надо послать ему такую команду ESC 't' 07 . Для начала решить попробовать сделать такую тестовую внеш. обработку:
ТекстДок = Новый ТекстовыйДокумент;
    ТекстДок.ДобавитьСтроку(СокрЛП(ЭлементыФормы.ПолеВвода1.Значение));
    ТекстДок.Записать("test.txt", ?(СписокКодировок=1,КодировкаТекста.ANSI,
    ?(СписокКодировок=2,КодировкаТекста.OEM,
    ?(СписокКодировок=3,КодировкаТекста.UTF16,
    ?(СписокКодировок=4,КодировкаТекста.UTF8,
    ?(СписокКодировок=5,"cp866",
    ?(СписокКодировок=6,"US-ASCII",КодировкаТекста.System)))))));
    
    КомандаСистемы("copy test.txt com"+СокрЛП(ЭлементыФормы.нПорта.Значение));


т.е. в форме обработке я сделал поле ввода для текста(команды), выпадающий список для выбора кодировки(пробовал такие ANSI,OEM,UTF16,UTF8,cp866,US-ASCII), и поле ввода номера COM-порта.
Какую кодировку я бы не пробовал при отправке команды принтер это воспринимает как текст для печати !!!
Нетак делаю или так но где то ошибка ?????

Вот пример из даташита этого принтера только на бейсике:
10 A$="CITIZEN"
20 LPRINT CHR$(&H1D);"!";CHR$(&H11);    // команда GS ! n
30 LPRINT A$;

В 20-й строке посылаем команду сделать шрифт двойной высоты GS ! n

И в даташите вот что написано: All print data sent from the host computer to the printer are automatically converted to one-byte alphanumeric or
katakana characters (ANK) or two-byte Kanji corresponding to the characters and symbols.

cvitova Подменю пользователя
сообщение 08.05.12, 22:23
Сообщение #2

Молчаливый
*
Группа: Пользователи
Сообщений: 4
Спасибо сказали: 1 раз
Рейтинг: 0

В 1С7 примерно так:
Текст.ДобавитьСтроку(Симв(27)+"t"+Симв(7));



 i 

Правила, п. 12
 


Сообщение отредактировал Vofka - 09.05.12, 8:54

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 23.06.24, 2:10
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!