Path: utzoo!utgpu!water!watmath!clyde!att!osu-cis!tut.cis.ohio-state.edu!bloom-beacon!bu-cs!purdue!decwrl!sun!pitstop!sundc!seismo!uunet!mcvax!enea!tut!santra!k34386t From: k34386t@kaira.HUT.FI (Petri Kruiseri Suominen) Newsgroups: comp.lang.pascal Subject: How to check for printer line status ? Message-ID: <13936@santra.UUCP> Date: 21 Jun 88 17:18:45 GMT Sender: news@santra.UUCP Reply-To: k34386t@kaira.UUCP (Petri Kruiseri Suominen) Organization: Helsinki University of Technology, Finland Lines: 20 Does anyone know how to check for printer line status with TP4, I've tried the following, but the result is just the same as with no check at all, PC just waits for the printer to become online. function checkprn:boolean; var lst:text; begin assign(lst,'LPT1'); {$I-} rewrite(lst); {$I+} if IOresult<>0 then checkprn:=false else checkprn:=true; end;