Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

печать напрямую на LPT. [D5, Win95/98]


der ©   (2002-04-10 11:33:00) 

Вопрос избитый, но по поиску ничего не нашел. Нужно из Windows-овской программы получать распечатку как из DOS программ.
Помогите, МАСТЕРА!


Song   (2002-04-10 13:46:00) [1]

Всегда рад помочь умному человеку.


der   (2002-04-10 13:37:00) [2]

все. проблемы больше не существует.
Спасибо!


Song   (2002-04-10 13:22:00) [3]

У меня получается так.
Для лазерного принтера просто достаточно закрыть очередь на спулере, чтобы печать была инициирована.


der   (2002-04-10 13:20:00) [4]

нет, там что-то типа прогонка листа... или... новый лист... нет не помню.


Song   (2002-04-10 13:16:00) [5]

Знаю. Вы не сделали CloseFile(ff);


der   (2002-04-10 13:13:00) [6]

.


der   (2002-04-10 13:11:00) [7]

спасибо!
Только после выполнения - принтер моргает, а страницу не выплевывает. Я как-то делал это, но не помню.
Не знаешь?


Song   (2002-04-10 12:54:00) [8]

Ok,
Var ff:TextFile;
...
AssignFile(ff,"lpt1");
ReWrite(ff);
и т.д.


der   (2002-04-10 12:34:00) [9]

нет не пойдет.
в этом случае используется установленный в windows принтер.
Надо просто отправить текст на LPT.


Song   (2002-04-10 12:00:00) [10]

AssignPrn();


Наверх

Титульная страница Поиск, карта сайта Написать письмо