Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!cs.utexas.edu!uunet!mcsun!sunic!tut!ra!chyde!ts
From: ts@chyde.uwasa.fi (Timo Salmi LASK)
Newsgroups: comp.lang.pascal
Subject: Re: Left Justifying
Keywords: Turbo Pascal
Message-ID: <753@chyde.uwasa.fi>
Date: 11 Sep 89 18:51:42 GMT
References: <537@disk.UUCP>
Reply-To: ts@chyde.uwasa.fi (Timo Salmi LASK)
Organization: U of Vaasa, Finland
Lines: 13

In article <537@disk.UUCP> specter@disk.UUCP (Byron 'Maxwell' Guernsey) writes:
>Is there any buily in way to left justify fields in the write or writeln 
>statements? I have been unable to find one, and just assumed that all fields

The function TRIMFLFN in TSUNTD.TPU in /pc/ts/tspas13.arc does that. 
It is available by anonymous ftp from our site.  (A justify function
is not difficult to write for a string.  The trick is to make the
function reasonably fast.)

...................................................................
Prof. Timo Salmi                                (Site 128.214.12.3)
School of Business Studies, University of Vaasa, SF-65101, Finland
Internet: ts@chyde.uwasa.fi Funet: vakk::salmi Bitnet: salmi@finfun