home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / MPICKE.ZIP / MPICKER.DOC next >
Encoding:
Text File  |  1988-08-16  |  4.7 KB  |  120 lines
  1.  
  2.  
  3.  
  4.  
  5.                M E N U       P I C K E R
  6.  
  7.  
  8.  
  9.  
  10.  
  11. -----------------------------------------------------------------------
  12. FILES
  13.  
  14. This archive should contain the following files:
  15.  
  16.           PICKER.PAS    Source code for PICKER.TPU
  17.           PICKER.TPU    Unit containing routines 
  18.           MPICKER.PAS   A sample program using PICKER.TPU
  19.           MPICKER.DOC   The documentation 
  20.  
  21.  
  22. -----------------------------------------------------------------------
  23. INTRODUCTION
  24.  
  25. The latest version of Nantucket's Clipper dBase III+ compiler has 
  26. several useful routines not found anywhere else. One of these is the 
  27. function ACHOICE (array choice) which takes an array and allows a point 
  28. and shoot style selection of one of the elements. PICKER.TPU contains a 
  29. function ACHOICE that is similar to Clipper's.  
  30.  
  31. I added a few extras that Clipper's ACHOICE didn't have. I allowed for 
  32. multiple columns of choices to be displayed across the screen. I tried 
  33. to mimic Turbo Pascal's style of selecting a file to use.  
  34.  
  35.  
  36. -----------------------------------------------------------------------
  37. USING ACHOICE
  38.  
  39. Load the array PICKMENU with all the choices. Don't worry about keeping 
  40. consistent string lengths, ACHOICE will make all the elements as long 
  41. as the longest one by adding spaces to the end. ACHOICE has seven 
  42. parameters, each is described below.  
  43.  
  44.         m         the name of the array
  45.         col       the column where the box will start
  46.         row       the row where the box will start
  47.         num       the number of elements in the array
  48.         depth     the number of vertical choices displayed
  49.         cols      the number of horizontal choices displayed
  50.         position  the defualt choice number 
  51.  
  52.  
  53. -----------------------------------------------------------------------
  54. MAKING A CHOICE
  55.  
  56. Make a choice by positioning the inverse-video box on the desired 
  57. selection and press <Enter>. If there are more choices than space in 
  58. the box, scrolling will occur. Small arrows in the upper left and lower 
  59. right corners indicate if choices exist up or down. Arrow keys will 
  60. function as normal, except left and right will go up and down if there 
  61. is only one column. <PgUp> and <PgDn> will scroll to the next box of 
  62. choices if there is one to scroll to, otherwise they will position the 
  63. box on the first or last choice. <Home> will go to the first choice, 
  64. and <End> will go to the last.  
  65.  
  66. Another way of positioning the box is to press the first letter of the 
  67. choice. This will position the box on the next choice that starts with 
  68. that letter if there is one.  
  69.  
  70.  
  71. -----------------------------------------------------------------------
  72. DISCLAIMER
  73.  
  74. In no way is the author responsible for any damage to software, 
  75. hardware, left kneecaps, expensive oriental vases, the Berlin Wall, or 
  76. anything else resulting from the use of this software.  
  77.  
  78. The contained software is donated to the public domain. You may use it 
  79. any way you see fit. You may even use it in your million-dollar program 
  80. without paying me a cent (but see below). All I ask is that when 
  81. distributing these files to others (BBS's, user groups, friends) all 
  82. four files remain in tact with documentation. After that you can do 
  83. whatever you want with it.  
  84.  
  85.  
  86. -----------------------------------------------------------------------
  87. THE BEGGING
  88.  
  89. I'm not going to beg for a $30 donation if you like this......but if 
  90. you do find this to be of some use or in some way it makes your life a 
  91. little happier, you might want to consider buying me lunch. I work next 
  92. to a Pepe's that serves great beef and bean burritos. With melted 
  93. cheese and a drink it would cost $3.36. Since even I can't live on only 
  94. burritos, for $3 to $5 I also get lunch at White Castle, Wendy's, or 
  95. that place on the corner that serves food dripping in grease. I'm not 
  96. much of a breakfast person, but if I'm driving far, I'll stop and get a 
  97. breakfast sandwich and an orange juice for about $2.15.  Buying me more 
  98. than one lunch is acceptable.  
  99.  
  100. I can be reached electronically through Gene Plantz's IBBS in Chicago 
  101. at (312) 885-2303 (ID# 0434) or CompuServe (71121,3247). Send any 
  102. questions, comments, insights, observations, funny stories about your 
  103. Aunt Betty, and six figure job offers to either of these fine 
  104. electronic subscription services.  
  105.  
  106. Send non-electronic substance such as pictures of your car, dead 
  107. insects found on the windowsil, blue theodaps, your grammer school 
  108. essay on President Filmore, and of course money for lunch to: 
  109.  
  110.  
  111.         Frank H Carr
  112.         P.O. Box 48915
  113.         Niles, IL  60648
  114.  
  115.  
  116. I was going to make up my own new word, but burritoware just didn't 
  117. sound too good. Maybe next I'll write something worth dinner.
  118.  
  119.  
  120.