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

Вниз

Ловушка на принтер...   Найти похожие ветки 

 
Sirus ©   (2003-04-04 06:56) [0]

Как можно узнать (программно) сколько страниц распечатано на принтере? И как перехватить обращение к принтеру и в зависимости от условий запретить распечатку?


 
_ALEXey_ ©   (2003-04-09 17:45) [1]

Такая же проблема!

Я нашел в хэлпе по SDK сообщение WM_SPOOLERSTATUS. Отлавливаю это сообщение в своей проге, а оно как-то плохо отлавливаетя :-(

Попробуй поискать в этом направлении.



 
_ALEXey_ ©   (2003-04-19 07:47) [2]

Почему-то этот код под W2K не работает.

..........
private
procedure WMSPOOLERSTATUS(var Msg: TWMSPOOLERSTATUS); message WM_SPOOLERSTATUS;
..........
procedure TForm1.WMSPOOLERSTATUS(var Msg: TWMSPOOLERSTATUS);
begin
Label1.Caption:= IntToStr(msg.JobsLeft);
Msg.Result:= 0;
end;


Пробовал FindFirstChangePrinterNotification. Тоже не работает.


 
gurban   (2003-04-19 10:32) [3]

Ставь на компьютер на котором стоит принтер W2K или XP, и программу O&K Print Watch.
Если хочешь сам писать программу на Win98 WM_SPOOLERSTATUS работает очень криво. При получении задания с другого компьютера вообще не хочет отрабатываться.
На W2K WM_SPOOLERSTATUS вообще не используется. Работает FindFirstChangePrinterNotification, но должна быть включена запись событий из спуллера с данными о задании. Где включается не помню, думаю можно в интернете найти.


 
Reals ©   (2003-04-19 18:09) [4]

Вот ссылка на программу, где организован достаточно полный пример перехвата принтера: http://www.varscomteh.com/downloads/PrintJob.rar

P.S. Эта программа ведет полную статистику, что/где/когда/сколько печатали на принтере.



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

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

Наверх




Память: 0.47 MB
Время: 0.016 c
1-84167
Кот
2003-06-08 12:58
2003.06.26
картинки


1-84368
kasper
2003-06-16 17:34
2003.06.26
Помогите с выводом на печать!!


7-84784
xmapa
2003-04-17 16:34
2003.06.26
Проверка готовности принтера


1-84321
AndrewR
2003-06-16 06:28
2003.06.26
Как можно вызвать FindDialog, что бы в Memo текст искал. Может ке


6-84512
LOX
2003-04-17 11:43
2003.06.26
TWebBrowser команда правка в блокнот.