Path: utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!uunet!bonnie.concordia.ca!thunder.mcrcim.mcgill.edu!quiche!dara
From: dara@cs.mcgill.ca (Dara UNG)
Newsgroups: comp.lang.pascal
Subject: Help in Printer Status!
Message-ID: <1991Jun22.163830.21689@cs.mcgill.ca>
Date: 22 Jun 91 16:38:30 GMT
Sender: news@cs.mcgill.ca (Netnews Administrator)
Organization: SOCS, McGill University, Montreal, Canada
Lines: 22
Originator: dara@homer

Hi there,

   I have problem in finding printer status (ON/OFF). Could someone
   out there suggest a solution ?
   The system that my application running is XT, TP 5.5

   I've tried the following code suggested by Tom Swan, "Mastering Turbo
   Pascal 5.5", but the output from PrintStatus always is 255
   regrardless of the ON/OFF state of printer!

   var   PrintStatus : byte;
   begin
	 PrintStatus := Port [ $03BD];
	 writeln (PrintStatus);
   end;

   I guess the adddress of printer status '03BD' is incorrect!

Thanks in advance,

Dara Ung.
dara@cs.mcgill.ca