获取打印机状态？？(100分)

如何在WIN2000下获取打印机状态（如未连接，联机，缺纸等）。是打印机硬件状态而
不是系统内部的状态，而且要在打印之前获取。E-MAIL：ctwjacke@163.com

要自己编底层的接口,用API度试试

用汇编，搜索一下，很多~~~

unit uPrinter;
interface
function CheckPrinter: boolean;
function GetPrinterStatus: byte;
implementation
//从并行端口读取打印机状态
function GetPrinterStatus: byte;
asm
MOV DX,$378;
IN AL,DX;
end;
//获取打印机是否出错
function CheckPrinter: boolean;
var
temp: byte;
begin
temp := GetPrinterStatus;
Result := not (((temp and $80) = 0) //打印机忙
or ((temp and $20) <> 0) //打印机缺纸
or ((temp and $10) = 0) //打印机未联机
or ((temp and $08) = 0));
//打印机出错;
end;

end.