home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / pascal / library / dos / database / edit_22 / update22 < prev   
Encoding:
Text File  |  1988-06-11  |  2.4 KB  |  63 lines
  1.                         Minor Upgrade to EDITOR.TPU
  2.                                 Version 2.2
  3.  
  4.  
  5. Brian Spykerman (Utah State University) pointed out a bug in the EditInt()
  6. function I had overlooked.  If you delete ALL the numeric characters
  7. during EditInt() entry and press <Enter>, you can "hang" the entire system.
  8. This bug is embarassing because I should have caught it LONG ago.  It is
  9. now fixed.  In addition, a similar bug in the EditReal() procedure has
  10. also been fixed.
  11.  
  12.                                  * * * * *
  13.  
  14. Several people have requested a "bail-out" function during data entry.
  15. This data entry "escape" function now allows data entry operators to quit
  16. entry at ANY point in the data entry process.  Pressing the Esc key can be
  17. used to bypass record insertion if the operator inadvertantly starts data
  18. entry or simply wishes to quit data entry without saving the record.  This
  19. function adds the global variable "Escape" as a Boolean operator.
  20.  
  21. For example:
  22.  
  23.     Repeat
  24.       Case FieldNo of
  25.         1 : EditString(Example,15,5,5,Black,White,'    ');
  26.                      .
  27.                      .
  28.                      .
  29.                      .
  30.       End; { Case }
  31.     Until FieldNo > LastField;
  32.          (* If the operator hasn't pressed the <Esc> key *)
  33.     If not Escape then
  34.     Begin
  35.       { Data, record and/or file handling procedure(s) }
  36.                      .
  37.                      .
  38.                      .
  39.     End;
  40.  
  41.  
  42. This method can also be employed to avoid the ubiquitous "Enter another
  43. record (Y/N)?" query at the bottom of the entry screen, thus saving one
  44. keystroke per entry record.  (See EDITOR.DOC)
  45.  
  46. NOTE: A little care must be taken in your programming to avoid the
  47.       possibility of unintentionally losing the last record entered.  One
  48.       method might be to query the operator if the current entry should
  49.       be saved or discarded: "Save current record (Y/N)?"
  50.  
  51.                                  * * * * *
  52.  
  53. Many thanks to those who have taken the time to write or call suggesting
  54. improvements to TPEdit.  I am STILL surprised at the popularity of this
  55. small TPU!  If you have questions, problems or suggestions, contact:
  56.  
  57.      COMPUsystems N.W.
  58.      Attn: John Winney
  59.      9792 Edmonds Way, Suite 226
  60.      Edmonds, WA 98020
  61.      (206) 774-1460    (no collect calls, please!)
  62.      C/O George Wishart Compuserve [ 70165,460 ]
  63.