如何判断打印机是否安装?

解决方案 »

  1.   

    Printer有个属性可以把当前安装的所有打印机列出来!!
    具体是什么属性忘了,你查查看……
      

  2.   

    var
     ADevice,ADriver,APort:Array[0..255] of Char;
     DeviceHandle:THandle;
    begin
      Printer.GetPrinter(ADevice,ADriver,APort,DeviceHandle);  if DeviceHandle=0 then                //句柄是0 ,表示打印机没有装载
      begin
       Printer.PrinterIndex:=Printer.PrinterIndex;
       Printer.GetPrinter(ADevice,ADriver,APort,DeviceHandle);
      end;  if DeviceHandle=0 then
       Application.MessageBox('默认打印机不存在,请检查打印机设置!',
                              '系统信息',Mb_ok);end;
    uses
      Printer;