请问一下,怎么才能检测到已经安装好的打印机器不可用!(50分)

  • 主题发起人 主题发起人 gz_yuanbo1
  • 开始时间 开始时间
G

gz_yuanbo1

Unregistered / Unconfirmed
GUEST, unregistred user!
请问一下,怎么才能检测到已经安装好的打印机器不可用!
打印机是在网络上的。已经安装好的,由于某些原因。比如说安装打印机的机器故障,导致打印机不可用了。这个时候,本机上的打印机状态为不可用。但是是存在的。
在程序中怎样检测这种情况?
 
怎么没有一个人回答呢?!
 
procedure TForm1.ButtonClick(Sender: Tobject);
begin
ComboBox1.Clear;
ComboBox1.Items.Assign(Printer.Printers);
if ComboBox1.Items.CommaText='' then
Messagedlg('你需要安装打印机才能打印!',mtError,[mbOk],0);
else
Form1.Print;
end;

 
to ::quejian
你需要看清楚问题的。你的这种情况解决不了这个问题。
 
很难搞! 不如在程序中让打印机打印一段你定义的测试信息,如果完成则打印机是可用的否则不可能撒,也不清楚,只是我这么想的!
 
问题是这样的,如果在这样的情况,你依然要打印某些东西,那打印机是可以接收这些信息的。问题就是,什么都打不了!!
 
加入一段汇编,监测打印机的状态。
 
后退
顶部