home *** CD-ROM | disk | FTP | other *** search
/ DOS Wares / doswares.zip / doswares / DATABASE / DBASE5 / CUA_SAMP.ZIP / CANHAND.PRG < prev    next >
Encoding:
Text File  |  1994-06-24  |  755 b   |  24 lines
  1. PROCEDURE CanHand
  2. *----------------------------------------------------------------------------
  3. * NAME
  4. *   OKHand - Generic Cancel Button handler
  5. *
  6. * DESCRIPTION
  7. *   Closes the form and sets the form's Action custom property value .F.
  8. *----------------------------------------------------------------------------
  9. #include "talkoff.hdb"
  10.  
  11.     *-------------------------------------------------------------------
  12.     *-- For ReadModal() forms, force Action custom property value to .F.
  13.     *-------------------------------------------------------------------
  14.     Form.Action = .F.
  15.  
  16.     *---------------------
  17.     *-- Shut down the form
  18.     *---------------------
  19.     lVoid = Form.Close()
  20.  
  21. #include "talkon.hdb"
  22. RETURN
  23. *-- EOP: CanHand
  24.