home *** CD-ROM | disk | FTP | other *** search
- FIELD.TPU
- ---------
-
- FIELD.TPU is the Turbo Pascal unit obtained by compiling FIELD.PAS. Turboì
- Pascal units are explained in chapter 4 of the language manual for version 4. ì
- FIELD.PAS was developed from KEYIN.INC by Michael H. Hughes so many of theì
- coding ideas in FIELD.PAS are his; however, FIELD.PAS incorporatesì
- significant changes.
-
- The main function in KEYIN.INC was called keyin. This function located eachì
- field on the screen, allowed data entry to and editing of the field, and onì
- termination returned the number of the next field to be processed. The dataì
- entered was stored in a string or an array. The main function in FIELD.PASì
- is called editfield. Like keyin it locates each field on the screen and ì
- allows data entry to and editing of the field, but it returns the key code ofì
- the terminating key rather than the number the next field. As can be seen inì
- the demonstration programs, this allows construction of more elaborateì
- screens. Both vertical and horizontal tabing from field to field may beì
- programmed for editing but suppressed during initial data entry. Data canì
- still be stored in strings, but numbers can now be stored as variables.
-
- OLDDEMO.PAS is the original demonstration program TESTKEY.PAS recoded to useì
- the new unit. Certain keying errors could spoil the screen of the oldì
- program. The new program appears to be bullet proof.
-
- NEWDENO.PAS is a simple chemical engineering program that illustrates how toì
- use FIELD.TPU to create a screen with a large number of fields that have theì
- same format. This screen style is required for many chemical engineeringì
- problems.
-
- FLDTEST.PAS was written to help debug FIELD.PAS. By playing with thisì
- program you will get a good idea how the unit works.
-
- Hopefully these demonstration programs and the comments in the source code ofì
- the unit will allow interested programmers to use this unit without undueì
- pain.
-
- Frank Wood, Jr.
-
- CIS User ID 74375,127
-
- July 2, 1988
-