Category : Dbase (Clipper, FoxBase, etc) Languages Source Code
Archive   : PICKLIST.ZIP
Filename : PICKLIST.DOC
- PICKLIST.DOC
- DEMO1.PRG
- TSCR.ASM
- TSCR.BIN
- PICKLIST.DBO
- NAMES.DBF
- NAMES.MDX
===============================================================================
PICKLIST 1.0 DOCUMENTATION
About PICKLIST:
What does PICKLIST do?
After PICKLIST is called, the program displays a box containing
a list of records. The user can navigate throughout the list
with the pgup, pgdn, and up/down arrow keys. The user then has
the option of selecting an item from the list (by pressing enter)
or (escape or left/right arrow) to do nothing. If enter is pressed
then the record pointer is positioned to the selected record. If
escape or left/right arrow are pressed then the record pointer
is not re-positioned.
The programer needs only to decide on the screen location
of the list, the fields to be displayed, and the number of
items to be displayed (height).
Upon return from PICKLIST the record pointer is positioned to
the selected record, providing that the user actually selected
an item. (WAS_PICK=.T.)
SEE DEMO1.PRG FOR AN EXAMPLE
USAGE:
DO PICKLIST WITH "FIELD","FIELD","FIELD",ROW,COLUMN,# TO DISPLAY,WAS_PICK
Where: FIELD IS A .DBF FIELD NAME (MUST BE IN QUOTES)
If only one or two fields need to be displayed then create a
variable such as NULL="" and use "NULL" in place of "FIELD".
Example: DO PICKLIST WITH "LASTNAME",FIRSTNAME","NULL",0,0,5,WAS_PICK
ROW = starting row of list window
COLUMN = starting column of list window
# TO DISPLAY = number of records to display in list (height of window)
WAS_PICK = a logical value that is returned true if the user presses
the [Enter] key within the picklist. A false value is
returned when the user presses escape or left/right arrow.
Note: PICKLIST does not validate ANY parameters. You must make sure that
you enter valid screen coordinates and at the same time making sure
that the width and height of the displayed picklist will also fit
on the screen.
NOTES ABOUT PICKLIST:
- THE FILE TSCR.BIN MUST BE IN THE DEFAULT DIRECTORY. THIS ROUTINE
IS ESSENTIAL TO THE OPERATION OF PICKLIST.
- For ver 1.1 only and was compiled on a color system
- Numeric fields are converted to a length of 10 with two decimals
- Only works with indexed .dbf's (.mdx works, haven't tried .ndx)
- Window refresh is acceptable on 286 machine, do not know about 8088
- Refresh is faster with less items displayed. (5-10)
- Do not use work area #10. PICKLIST creates a "mirror" image of the
current .dbf in use by using the USE IN AGAIN statement.
- Variables used: (all are RELEASED after return from PICKLIST)
row col cnt p1 p2 p3 p4 height
end_row end_col startrow ptr beg_row beg_col
parm top_rec width curr_dbf curr_ord
- Navigation keys
[Esc], left/right arrow = exit list
[Return] = select item in list
PgUp, PgDn, up/down arrow = just what they imply
===============================================================================
Please leave comments, suggestions, or questions via mail on the
Ashton Tate BBS addressed to user name SLICE.
Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!
This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.
But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/