突然短路,问如何判断系统中是否安装有打印机??(10分)

  • 主题发起人 主题发起人 marco_hsu
  • 开始时间 开始时间
M

marco_hsu

Unregistered / Unconfirmed
GUEST, unregistred user!
突然短路,急需答案,如何判断系统中是否安装有打印机??搞定就结!
 
烂招,自己优化
首先在uses增加Printers,再准备一个列表框ComboBox1,
其属性Visible设为FALSE,然后在打印之前执行下列语句,
那么就可以检测到是否存在打印机了:
ComboBox1.Clear;
ComboBox1.Items.Assign(Printer.Printers);
if ComboBox1.Items.CommaText = ',' then
Messagedlg('你需要安装打印机才能打印!', mtError, [mbOk], 0);
 
谢谢答复,其实只要判断PRINTER.PRINTERS.COUNT>0就可以了,不过还是要谢谢你
 
后退
顶部