@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
@ @
@ @@@@@@ @@ @@ @@@@@@ @
@ @@ @@ @@ @@ @
@ @@@@@@ @@ @@ @@@@@@ @
@ @@ @@@@ @@ @
@ @@@@@@ @@ @@@@@@ @
@ @
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
@@@@@@@@@@ @@@@@@@@@@
@@@@@@@@@@ @@@@@@@@@@
@@@@@@@@@@ @@@@@@@@@@
@@@@@@@@@@ @@@@@@@@@@
@@@@@@@@@@ @@@@@@@@@@
@@@@@@@@@@ @@@@@@@@@@
@@@@@@@@@@ @@@@@@@@@@
@@@@@@@@@@ @@@@@@@@@@
@@@@@@@@@@@@@@@@@@
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
@@ @@
@@ @@@@@@ @@ @@ @@@@@@ @@@@@@ @@@@@@ TM @@
@@ @@ @@ @@ @@ @@ @@ @@ @@ @@ @@
@@ @@ @@ @@ @@@@@@ @@@@@ @@ @@ @@
@@ @@ @@ @@ @@ @@ @@ @@ @@ @@ @@
@@ @@ @@@@@@ @@ @@ @@@@@@ @@@@@@ @@
@@ @@
@@ @@@@@@ @@@@@@ @@ @@ @@@@@@ @@@@@@ @@
@@ @@ @@ @@ @@ @@ @@ @@
@@ @@@@@@ @@ @@ @@ @@@@ @@@@ @@
@@ @@ @@ @@ @@ @@ @@ @@
@@ @@@@@@ @@ @@@@@@ @@ @@ @@
@@ @@
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
@@@@@@@@@@@@@@@@@@
@@@@@@@@@@ @@@@@@@@@@
@@@@@@@@@@ @@@@@@@@@@
@@@@@@@@@@ @@@@@@@@@@
@@@@@@@@@@ @@@@@@@@@@
@@@@@@@@@@ @@@@@@@@@@
@@@@@@@@@@ @@@@@@@@@@
@@@@@@@@@@ @@@@@@@@@@
@@@@@@@@@@ @@@@@@@@@@
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
@ @
@ @@@@@@ @@@@@@ @@@@@@ @@@@@@ @@ @@ @@@@@@ @@@@@@ @
@ @@ @@ @@ @@ @@ @@@ @@ @@ @@ @
@ @@ @@@@@@ @@ @@ @@ @@@@@@ @@@@ @@ @@@ @
@ @@ @@ @@ @@ @@ @@ @@@ @@ @@ @@ @
@ @@ @@@@@@ @@@@@@ @@@@@@ @@@@@@ @@ @@ @@ @@@@@@ @
@ @
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@



TS_Confg v01.02.00 - Turbo Stuff Self-Configuration Routines for Turbo Pascal

Copyright (c) 1989 Shenandoah Valley Software, all rights reserved.



Shenadoah Valley Software
P.O. Box 1456
Winchester, Va 22601
Turbo Stuff - TS_Confg

Introduction

Turbo Stuff is a set of utilities being developed for use with Turbo
Pascal 5.0. Since there are numerous utility packages currently on the
market that do generic things like windows, menus, string functions,
etc., Turbo Stuff will be devoted mostly to the more advanced areas
like error trapping, memory residency, advanced i/o, self configuration
and more.

Shenandoah Valley Software will release Turbo Stuff "piece-meal" as
it is developed, with full source code. Once the entire package is
completed, it will be combined into a full ShareWare product. Those
wishing to receive a substanial discount off the registered version
(which should sell for about $50) should send us $10. For this $10 you
will receive a disk containing all those routines currently available
and will receive a discount of 100% off the registration price of the
final release. That means for $10 now you will get the whole thing
free when it is released. Target release date is Fall 1989.

Files Included in the Release

TS_CONFG.TPU - the Turbo Pascal 5.0 TS_Confg unit
TS_CONFG.PAS - the pascal source file for the TS_Confg unit
TS_CONFG.DOC - the documentation for the TS_Confg unit
LEGAL.SVS - text file contains the legalese on Turbo Stuff
BUG_FORM.SVS - text file/mailer on reporting bugs
SUPPORT.SVS - text file on support services from SVS
BETATEST.SVS - text file on becoming a beta tester
CFG_DEM1.PAS - demo using TS_Confg
CFG_DEM2.PAS - demo using TS_Confg on linked OBJ screen
CFG_DEM2.BIN - binary screen image file for demo #2
CFG_DEM2.OBJ - object code for above

What is TS_Confg and how does it work?

TS_Config is a routine which allows you to create programs that modify
themself, or are self-configuring. This procedure is pretty straight
forward by using typed constants. This requires two steps. First
create a record TYPE that contains a variable for each piece of data
you wish to include in the configuration. Second, create a CONST using
that record to contain the default values. For example:

TYPE
ConfigRec = RECORD
Name : string[30];
Phone : string[12];
END;

CONST
Config : ConfigRec = ( Name : 'John Test' ;
Phone : '123-456-7890' );

That's it. Once this has been done, all you have to do in your program
is prompt the user for the new information and call the TS_Config
procedure.

Using TS_Confg on Linked OBJ Screens

Ever convert a binary screen image to obj, link it with your program
and find out later that you needed to be able to save modifications to
the compiled .exe? Try TS_Config! See CFG_DEM2.PAS

TS_Confg Reference

Syntax: TS_Config ( FileName, seg(const), ofs(const),
@const, Sizeof(const), error );

Parameters: Filename - name of .EXE file
const - name of CONST declaration

Returns: error - (integer)

Example: assuming the EXAMPLE.EXE and the above constant.

VAR Oops : integer;
BEGIN
TS_Config ('EXAMPLE', seg(Config), ofs(Config),
@Config, Sizeof(Config), Oops);
END;

Limitations

The only limitation is the size of the record. TS_Config uses and
array of char for temporary storage. TS_Config comes pre-configured
for a record size of 5000. This can be changed by editing the
TS_CONFG.PAS source and changing the size of the array in the TS_CONFIG
procedure to the desired size. You must then recompile the TPU.

Using Older Version of Turbo Pascal

Simply, you can't. TS_Confg uses Turbo Pascal 5.0 specific commands.
With a little work, and some additional toolkits, you could modify
TS_Confg to work with Turbo Pascal 4.0.

I/O Errors

TS_Config uses the {$I-} compiler directive to check for I/O errors
when opening and writing to the exe file. If an error is encountered,
the error variable defined by the user is set. Otherwise, the error
variable is set to zero. (See the example above, Oops.) For a list of
error codes, refer to the Turbo Pascal Reference Manual.

Runtime Errors

As-is, TS_Config does not support run-time error checking. Errors such
as the disk being write-protected, the drive door open, etc. will
cause the program to halt with the ever familiar Runtime error message
of Turbo's. Although there are several ways to solve this, using the
TS_Error routine is the best. For more information on this unit,
download the file TS_ERROR.

Revision History

31-MARCH-89 - 1st release

31-MARCH-89 - 2nd release, added verification process using the
SetVerify procedure. Thanks to Don Gibson for pointing out that
users may remove the disk before DOS gets around to actually writing
its buffer.