W
wyb_star
Unregistered / Unconfirmed
GUEST, unregistred user!
代玛如下：当连LPT1的打印机电源关闭时程序就会死，
谁知道怎样才能探测打印机状态
var
lpt :TextFile;
begin
AssignFile( lpt, 'LPT1');
Write( lpt, '打印测试' );
Write( lpt, #12 );
//打印机换页
CloseFile( lpt );
end;
谁知道怎样才能探测打印机状态
var
lpt :TextFile;
begin
AssignFile( lpt, 'LPT1');
Write( lpt, '打印测试' );
Write( lpt, #12 );
//打印机换页
CloseFile( lpt );
end;