🚀 go-pugleaf

Hi,

> TheCostStr := stringof ('Cost of item ' , ItemNameStr , ' = ' ,
>  Price[ItemNumber] * Qty[ItemNumber] ) , '.');
> Any idea how to create a function that would allow such a parameter ?
I do not know what you want to do with it, but you cannot create a
procedure/function that will accept this yourself. However, you can
write yourself an textfile devicedriver (covered in the TP manual), and
then do something like:

Write(MyOwnDriver, 'Cost of item ', Itemnamestr, '.......'); etc...

You might also want to check out "Format" or "FormatStr" which can do
something like:

WriteLn(Format('Cost of item %d = %d.', [ItemNameStr, 1*2]);

etc..

Yours Sincerely,
   Maarten Bekers [author of EleBBS]

EMail        : elevator@wxs.nl
FidoNet      : 2:285/233.5
ICQ          : 11985619