как создать виртуальный принтер

← →
Nosik_alex (2003-08-06 10:17) [0]

Народ! Посоветуйте, как создать виртуальный принтер в системе, что бы на него можно было печатать из ДОС-приложения, а затем этот принтер обрабатывал и форматировал эту информацию от ДОС-приложения как мне нужно и печатал её на лазерный принтер?

← →
PVOzerski © (2003-08-06 10:48) [1]

Может, сделать резидент под DOS, чтобы перехватывал INT 17H. Но если прога работает напрямую с LPT-портом, этот номер не пройдет.

← →
Nosik_alex (2003-08-06 11:33) [2]

Да хотелось бы красиво, на уровне Винды.

← →
y-soft © (2003-08-06 13:04) [3]

В NT-системах можно перенаправить печать из DOS-программы на любой установленный принтер:

net use lpt1: [\\Server_Name\Printer_Name]

А потом освободить:

net use lpt1: /d

← →
Nosik_alex (2003-08-06 13:42) [4]

Это понятно, но мне нужно перехватить то, что идет на принтер от ДОС-приложения, обработать и затем напечатать на лазерном принтере. Поэтому и нужен виртуальный принтер.

← →
PVOzerski © (2003-08-06 14:14) [5]

А ежели этот самый \\Server_Name\Printer_Name сделать Generic/text only и направить в файл?

← →
Nosik_alex (2003-08-06 14:28) [6]

Там всплывает окно и предлагает ввести имя файла. Если вводить программно имя, то нет уверенности в том что следующее задание не затрёт уже сформированный ранее не обработанный файл.

Во всяком случае, я сейчас успешно вывел текст в файл :^). А генерация неповторяющегося имени файла - дело техники. Хотя выглядят все эти выскакивающие диалоги, честно говоря, несколько удручающе...

← →
Nosik_alex (2003-08-06 15:04) [8]

С печатью в файл у меня практически уже реализовано, но это не красиво.

Если есть желание разбираться в чужом непростом коде, то, например, для GhostScript, который работает как раз, как виртуальный принтер, доступны исходники:

http://www.cs.wisc.edu/~ghost/doc/cvs/Readme.htm

Или посмотреть примеры в DDK. Но как-то не предназначена Delphi для написания драйверов...

как создать виртуальный принтер Найти похожие ветки