home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / CPM / DBASEII / DBEZMENU.TXT < prev    next >
Text File  |  2000-06-30  |  3KB  |  71 lines
  1. .RR---------------------------------------------------R
  2. .op
  3. .mt3
  4. .mb4
  5. ..
  6. ..<<<<<<<<<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>>>>>>>>>>>
  7. ..<<<<<<<<<       CP/M Athens Newsletter     >>>>>>>>>>
  8. ..<<<<<<<<<     Vol 2, No 8, August 1985     >>>>>>>>>>
  9. ..<<<<<<<<< P.O. Box 2121, Athens, GA  30612 >>>>>>>>>>
  10. ..<<<<<<<<<  Pat Boyle @ Phone 404-549-9586  >>>>>>>>>>
  11. ..<<<<<<<<<<<<<<<<<<<<<<<<<>>>>>>>>>>>>>>>>>>>>>>>>>>>>
  12.                   MAKING DBASE MENUS
  13.                      By Pat Boyle
  14.  
  15. Many  methods of menu design for dBASE employ heavy use
  16. of  @ row,col SAY/GET which require that you  know  the
  17. coordinates  of  the desired rows and columns  for  the
  18. text that you want printed on the screen. Since working
  19. with  raw  screen  coordinates can  get  tedious,  I've
  20. developed  a  method  of MENU design  using  the  dBASE
  21. commands  'TEXT/ENDTEXT.' Some of the advantages of  my
  22. method  (my  apologies  to others  who  have  developed
  23. similar methods) are:
  24.  
  25. 1 - 'What  you  see' in your editor 'is what  you  get'
  26.     when you execute your command file in dBASE.
  27. 2 - You  need  to  determine  only one set  of  row,col
  28.     coordinates (the GET in the choice DO WHILE loop)
  29.     simplified if you use an editor such as WordStar.
  30. 3 - Menu  editing is simplified since only one  set  of
  31.     coordinates needs adjusting when changes are made.
  32. 4 - This  method  when used with the substring  logical
  33.     operator  ($) prevents continuous rewriting of  the
  34.     menu  to  the screen when incorrect  or  non active
  35.     choices are made by the operator.
  36.  
  37. The  following  is  a  simple  dBASE  II  command  file
  38. demonstrating this technique of menu generation.
  39.  
  40. SET TALK OFF
  41. STORE T TO menurepeat
  42. DO WHILE menurepeat
  43.   ERASE
  44.   TEXT
  45.     ========== Example Menu For dBASE II ==========
  46.                      Q - QUIT
  47.                      1 - OPTION 1
  48.     ===============================================
  49.                  Enter Your Choice -->
  50.     ===============================================
  51.   ENDTEXT
  52.  
  53.   STORE " " TO choice
  54.   DO WHILE .NOT. choice$('Q1')
  55.      STORE " " TO choice
  56.      @ 5,39 GET choice PICTURE "!"
  57.      READ
  58.   ENDDO choice
  59.  
  60.   DO CASE
  61.      CASE choice = 'Q'
  62.           STORE F TO menurepeat
  63.      CASE choice = '1'
  64.           ERASE
  65.           ? 'Command such as DO OPTION1 might go here'
  66.           WAIT
  67.           STORE T TO menurepeat
  68.   ENDCASE
  69. ENDDO menurepeat
  70. SET TALK ON
  71.