Форум: "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.74 MB
Время: 0.025 c