Path: utzoo!attcan!uunet!lll-winken!lll-tis!ames!mailrus!tut.cis.ohio-state.edu!ukma!ukecc!agollum
From: agollum@engr.uky.edu (Kenneth Herron)
Newsgroups: comp.lang.pascal
Subject: Re: Re: Bug in TP4 printer-unit
Message-ID: <2426@ukecc.engr.uky.edu>
Date: 10 Jun 88 04:59:53 GMT
References: <304@krafla.rhi.hi.is> <900@bucket.UUCP> <319@krafla.rhi.hi.is>
Reply-To: agollum@engr.uky.edu (Kenneth Herron)
Followup-To: comp.lang.pascal
Organization: Way down south in the land of Basketball
Lines: 24

In episode <319@krafla.rhi.hi.is>, we
heard bjornb@krafla.UUCP (Bjorn H Bjornsson) say:
>><When you do a write(lst, chr(26)) in Turbo Pascal 4.00 the character 26
>><(Ctrl-Z) gets lost.  This is absolutely fatal when you're printing
>><special codes, and VERY annoying when you're doing printer-graphics
>
>  You can print all char's from 0 to 255 except 26.  Can anyone give me
>a single reason (or more) why you sholdn't be able to print CTRL-Z?

The *REASON* is that Lst is defined as a text file, and opened as
such.  DOS treats ^Z as end-of-file, and evidently strips it from 
printer output (or maybe turbo's doing it).  You'd see the same thing
happen if you printed to disk, I imagine.

To print ^Z to the printer, try this:

var
    Lst: file of char;

[...]
assign(Lst, 'PRN'); { Or LPT, or LPT1, or COM1, or whatever }
reset(Lst);   { or ReWrite; I believe they'd work the same here }
[...]

Kenneth Herron