Path: utzoo!attcan!utgpu!jarvis.csri.toronto.edu!mailrus!cs.utexas.edu!uunet!pilchuck!seahcx!phred!brianr From: brianr@phred.UUCP (Brian Reese) Newsgroups: comp.lang.pascal Subject: Re: Output to printer. Message-ID: <2765@phred.UUCP> Date: 29 Sep 89 19:02:27 GMT References: <50331@tiger.oxy.edu> Reply-To: brianr@phred.UUCP (Brian Reese) Organization: <50331@tiger.oxy.edu>o Lines: 33 In article <50331@tiger.oxy.edu> c_wilson@oxy.edu (Clarence Regis Wilson) writes: >You can send your output to the printer using the following commands: > >uses printer; > >writeln(lst,'This will be sent to printer'); > >Remember, though, that the string will be sent only to the printer. >If you must see the output on the screen also, you must duplicate >the 8 >*writeln* statement without the *lst* option. OK, OK. I'll give in. The original poster is using Turbo 3.02. 3.0 does not *use* any units. The simplest way I see to do this is to redefine the standard Output to prn as follows: program Test(Output); begin WriteLn('This is CRT output'); Assign(Output, 'prn'); ReWrite(Output); WriteLn('This is PRN output'); end. Good luck. 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."