如何有效地监控客户端的打印?(期待 DelphiSwords 兄出现),高分求一打印监控控件 ****** ( 积分: 100 )

在NT/XP 客户端下,如何有效地监控打印对列,即用户打了多少张
在大富翁有相关的问题,但都不了了之,无法查.所以请高手点明.
另 DelphiSwords,贴了一段代码( http://www.delphibbs.com/delphibbs/dispq.asp?lid=1092052 ) ,其中
with PPrinterNotifyInfo(AInfo)^ do
begin
if Count = 2 then
begin
P := @aData;
if (P[1].Field = JOB_NOTIFY_FIELD_PAGES_PRINTED) then
begin
end;
end else if FCurPrinted = FCurPages-1 then
APagePrinted; //在delphi7 winxp 下无法编译通过
end;
请DelphiSwords 点明一下,同时请问它如何调用??
多谢DelphiSwords 兄

无人涉及过此类问题么?还是我的分太少?

帮顶,共同学习中!

madCollection中有一个监视打印的HOOK示例
官方网http://www.madshi.net

TO: 风铃夜思雨
已下载,并看了一下,好象他用DC的参数实现,非不能取得如已打印页数,总页数等信息
不知你有没有类似的经验(用madCollection)

学习学习

顶顶!

多人接受答案了。