Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Print to Epson printer


amamed_3071 ©   (2001-11-03 10:09:00) 

У кого ест код печати под дос на Epson printer с командами принтера(ESC @.....)
мне нужен начат печать установаит параметры бумаги и размер шрифта лине вниз и конец печати Принтер соединен на сом порт


Mbo   (2001-11-03 11:53:00) [1]

во первых, SendText не ставит ли CR/Lf в конце? Если да, то надо посимвольно
посылать надо коды ESC - 27, @ - 64
#27#64 или
const ESC=27
chr(ESC)+"@"
и без пробелов


amamed_3071   (2001-11-03 10:59:00) [2]

Ну а как исолзоват это прямо на сом порт послат техт что ли примерно так
COMPort.Sendtext("ESC @")
COMPort.Sendtext("ESC I 5")....


Mbo   (2001-11-03 10:43:00) [3]

ESC @ 64 Initialize
13 CR
10 Line Feed
12 Form Feed
Esc C 0 67 Page Length Inches
Esc 3 51 n/216 Line Spacing
Esc I 108 Left Margin
Esc P 80 10cpi
Esc M 77 12 cpi


Наверх

Титульная страница Поиск, карта сайта Написать письмо