请问给问大虾：delphi的发出print后，能否捕逐打印机是否能正常工作？

Question

在delphi程序中入用quickrep 在打印按钮的onclick事件中写下：quickrep1.print;
后能否捕逐打印机是否能正常工作？ 
比如word文档就可以通知没连上打印机之类的消息

Answer 1

你可以先检查打印机状态//获取打印机是否出错function CheckPrinter:boolean;vartemp:byte;begintemp:=GetPrinterStatus;Result:=not ( ((temp and $80)=0) //打印机忙or ((temp and $20)<>0) //打印机缺纸or ((temp and $10)=0) //打印机未联机or ((temp and $08)=0) ); //打印机出错;end;