Форум: "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.71 MB
Время: 0.02 c
1-22164           WarChilD              2001-12-19 21:46  2002.01.08  
ListBox --> Row Select


7-22446           Paradox               2001-09-25 19:12  2002.01.08  
Не пропускайте!!!Ну, очень нужно.


4-22474           Slym                  2001-11-02 11:25  2002.01.08  
Не получается сделать Хук... Помогите!


14-22388          Merlin                2001-11-08 11:43  2002.01.08  
Очередная грязь в кладовке


6-22301           Китаец Что За         2001-10-10 14:45  2002.01.08  
Склерозик что ли?