Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Вниз

Print to Epson printer 


amamed_3071   (2001-11-03 10:09) [0]

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



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

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



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

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



Mbo   (2001-11-03 11:53) [3]

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




Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.025 c
1-21999           elephant              2001-12-15 02:02  2002.01.08  
C++ or Delphi


1-22091           Mikhalyov Dmitry      2001-12-19 16:02  2002.01.08  
вопрос из Pascal


4-22464           Dimich                2001-11-01 14:50  2002.01.08  
Книги по API на русском


3-21962           phantom2040           2001-12-04 13:27  2002.01.08  
Установка фильтра в TDStringGrid


3-21930           Roman55               2001-12-04 16:37  2002.01.08  
BDE