CAL.FXP - The popup calendar for FoxPro 2.5/DOS.

The following examples are correct methods of calling CAL.FXP:

?Cal()

?Cal(m.dte)

?Cal({01/01/94})

REPLACE mydbf.birthday WITH Cal(mydbf.birthday)

REPLACE mydbf.today WITH Cal()

m.dte=Cal()

Passing CAL an empty date or no date will default CAL to the system date.

After calling the function, a system window called "Calendar" will
appear.  It will look similar to this:


      January 1994     <-    Month & Year label
 <M> <M> <Y> <Y>  <-    Tool Bar
 Su Mo Tu We Th Fr Sa 
 Ĵ 
              1 <-
 Ĵ 
  2 3 4 5 6 7 8 <-
 Ĵ 
  9101112131415 <-    Dates
 Ĵ 
 16171819202122 <-
 Ĵ 
 23242526272829 <-
 Ĵ 
 3031           <-
  
      < Cancel >       <-    Quit
                       

Controls are fairly simple.  Clicking on the MONTH & YEAR label will move
the date pointer to the current system date (today).  Clicking on a "<M>"
button on the tool bar will move forward or backward a month.  The same
will happen to the year if the "<Y>" buttons are pressed.  Clicking any valid date will return that date.  Clicking the <Cancel> button will return the date initialy passed to the function.

DEMO PROGRAM:

Shows how to use CAL effectively in a screen.  Type DO DEMO to run.

Enjoy.


Comments are welcome.  

Matt Gordon
CompuServe ID: 74347,750