Path: utzoo!attcan!utgpu!jarvis.csri.toronto.edu!mailrus!wuarchive!gem.mps.ohio-state.edu!ginosko!uunet!pilchuck!seahcx!phred!brianr From: brianr@phred.UUCP (Brian Reese) Newsgroups: comp.lang.pascal Subject: Re: Output to printer. Message-ID: <2767@phred.UUCP> Date: 2 Oct 89 14:49:55 GMT References: <50331@tiger.oxy.edu> <2765@phred.UUCP> Reply-To: brianr@phred.UUCP (Brian Reese) Organization: <2765@phred.UUCP>o Lines: 36 Attn: Joe Duval Joe, your mail bounced so here is my reply. In reference to the following code: >program Test(Output); > >begin > WriteLn('This is CRT output'); > Assign(Output, 'prn'); > ReWrite(Output); > WriteLn('This is PRN output'); >end. > you suggested that the second WriteLn should explicity use the standard device Output, i.e. WriteLn(Output, 'This is PRN output'); Well, it's my understanding that when Write or WriteLn is called with no device specification, it defaults to Output, whatever Output is defined to be. In this case, it is redefined as 'prn'. I admit, this does not solve the original posters problem because this doesn't work with Turbo 3.0, (can't reassign a standard device, which I figured out last weekend), but I did run it on 4.0 and got the correct result. Thanx for responding. Brian -- Brian Reese uw-beaver!pilchuck!seahcx!phred!brianr Physio Control Corp., Redmond, Wa. brianr@phred.UUCP "Do not write on this line. This line has been left blank intentionally."