Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.15;
Скачать: CL | DM;

Вниз

Непрерывная печать на принтер   Найти похожие ветки 

 
Алексей Коваленко   (2002-05-31 10:16) [0]

День добрый,
Имеется матричный принтер с лентой, необходимо раз в 10 минут скидывать блоки информации по 2-3 строки, пробывал так:
AssignPrn(LPT);
Rewrite(LPT);
WriteLn(LPT,"Строка 1");
WriteLn(LPT,"Строка 2");
WriteLn(LPT,"Строка 3");
System.CloseFile(LPT);

Все печатается но после закрытия LPT прокручивает страницу, это сколько же бумаги надо, как бы убрать эту прокрутку
Пробывал не закрывать
AssignPrn(LPT);
Rewrite(LPT);
WriteLn(LPT,"Строка 1");
10 минут
WriteLn(LPT,"Строка 2");
10 минут
WriteLn(LPT,"Строка 3");
System.CloseFile(LPT);

не печает пока не закроешь, впринципе устроило бы если печать шла до закрытия, но выплевывать должен сразу.

Алексей


 
SEM ©   (2002-05-31 14:01) [1]

Попробуй так:

var
PRN : TextFile;
.........................
Assign (PRN, "LPT1")
Write(PRN, #27);
Write(PRN, #64);

// Здесь выводим все, что нам надо

Close(PRN);


 
SEM ©   (2002-05-31 14:03) [2]

Поправка: После Assign
Rewrite (PRN);



Страницы: 1 вся ветка

Текущий архив: 2002.08.15;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.018 c
3-47951
DenNNis
2002-07-25 08:58
2002.08.15
SQL беда !!!


1-48098
xerox
2002-08-04 13:49
2002.08.15
Подскажите, как запустить несколько копий одной и той же формы?


14-48280
Vicos1
2002-07-21 17:12
2002.08.15
Вопрос по матери на i810


4-48363
tretmike
2002-06-10 12:28
2002.08.15
Как опредилить имя файла приложения, зная хендл окна


4-48359
Volj
2002-06-05 14:38
2002.08.15
Как мне получить процент свободных ресурсов в Win98?