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)+"@"
и без пробелов

Print to Epson printer Найти похожие ветки