home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C!T ROM 2
/
ctrom_ii_b.zip
/
ctrom_ii_b
/
PROGRAM
/
FOXPRO
/
CALNDR
/
CAL.MAN
< prev
next >
Wrap
Text File
|
1992-02-10
|
890b
|
30 lines
Mon 02-10-1992
CAL.PRG (source included) exports one function GetADate which displays a
calendar, lets the user move around using cursor keys (pgdn/up moves by
months, ^pgdn/up moves by years), and returns the selected date. Client
routines should set __color_std and __color_enhcd before calling and
must check lastkey() to make sure user didn't hit escape.
To use declare:
#include cal.hdr
in your source file and link with cal.obj
(eg LINK myprog.obj+cal.obj,,,d:\force\lib\force)
Note that I'm not certain I know all of the arcana of testing for Leap
Year (I think I got them all but...). If you care, check out Function
IsLeapYear.
(This code is public domain, free, and I don't care what the hell you do
with it).
Comments, questions, flames to
Walter Henry
Conservation Lab
Stanford University Libraries
415-447-4884
whenry@lindy.stanford.edu