Форум: "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
1-22030           Андрей Сенченко       2001-12-18 12:49  2002.01.08  
Form.OnCloseQuery - Как обработать ?


1-22204           Dmitriy(new)          2001-12-13 19:37  2002.01.08  
код не создает более `273 files in win2000


14-22359          Сергей1               2001-11-07 15:36  2002.01.08  
Cp1251


4-22487           Rad                   2001-11-05 00:40  2002.01.08  
Создание макроса в Excel


3-21973           Zav                   2001-12-06 10:55  2002.01.08  
Компонент DBNavigator