Article View: comp.lang.pascal.borland
Article #394Re: function StringOf
From: Ing. Franz Glaser
Date: Sun, 27 Dec 1998 00:00
Date: Sun, 27 Dec 1998 00:00
21 lines
1681 bytes
1681 bytes
Quality wrote:
>
> In another Pascal there was a function that I would like to recreate:
>
> function StringOf ( ** SPECIAL ** ) : string;
>
> The SPECIAL part was a parameter that was virtually identical to the
> parameter used by writeln(). That is to say that the following worked:
>
> TheCostStr := stringof ('Cost of item ' , ItemNameStr , ' = ' ,
> Price[ItemNumber] * Qty[ItemNumber] ) , '.');
>
> Any idea how to create a function that would allow such a parameter ?
http://www.geocities.com/SiliconValley/2926/tp.html
page FAQ click on 1QA.
Here you find an article from Arsene von Wyss which uses a redirected
Write procedure for the OutTextXY as it is used in graphics BGI mode.
Franz Glaser
Technical Details
Message-ID:
<3685A0DC.36F78EB1@eunet.at>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<763sl2$v0@enews2.newsguy.com>Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 10261c,f9d88b35457e1f1d X-Google-Attributes: gid10261c,public X-Google-Thread: 108ebd,f9d88b35457e1f1d X-Google-Attributes: gid108ebd,public X-Google-Thread: 111659,f9d88b35457e1f1d X-Google-Attributes: gid111659,public From: "Ing. Franz Glaser" <meg-glaser@eunet.at> Subject: Re: function StringOf Date: 1998/12/27 Message-ID: <3685A0DC.36F78EB1@eunet.at> X-Deja-AN: 426059820 Content-Transfer-Encoding: 7bit References: <763sl2$v0@enews2.newsguy.com> To: Quality <quality@annex.com> Content-Type: text/plain; charset=us-ascii X-Complaints-To: abuse@Austria.EU.net X-Trace: fleetstreet.Austria.EU.net 914727109 26347 193.81.169.152 (27 Dec 1998 02:51:49 GMT) Organization: http://members.eunet.at/meg-glaser/index.html Mime-Version: 1.0 NNTP-Posting-Date: 27 Dec 1998 02:51:49 GMT Newsgroups: comp.lang.pascal.borland,borland.public.turbopascal,comp.lang.pascal.misc