home *** CD-ROM | disk | FTP | other *** search
/ DOS Wares / doswares.zip / doswares / DATABASE / DBASE5 / CUA_SAMP.ZIP / NEWDATE.DFM < prev    next >
Encoding:
Text File  |  1994-06-24  |  1.5 KB  |  48 lines
  1.  
  2. *.............................................................................
  3. *
  4. *   Program Name: NEWDATE.DFM         Copyright: Borland International
  5. *   Date Created: 28 Mar 94            Language: dBASE 5.0
  6. *   Time Created: 13:38:20               Author: Borland dBASE R&D
  7. *   /brief/library.src
  8. *.............................................................................
  9.  
  10.     DEFINE FORM NewDate;
  11.         PROPERTY ;
  12.             HELPFILE "DBASE1.HLP",;
  13.             HELPID   "20514",;
  14.             TOP       dbCalndr.Top + 4,;
  15.             LEFT      dbCalndr.Left + 10,;
  16.             WIDTH     28,;
  17.             HEIGHT     7,;
  18.             PROCFILE "CALENDAR.PRG",;
  19.             SYSMENU  .T.,;    
  20.             TEXT     [Set New Date];
  21.             CUSTOM;
  22.                 lSCent .F.,;
  23.                 lFlag  .F.
  24.                 
  25.     DEFINE TEXT tL1 OF m->NewDate AT 1,2;
  26.         PROPERTY ;
  27.             TEXT [&New Date ]
  28.  
  29.     DEFINE SPINBOX e1 OF m->NewDate AT 1,11;
  30.         PROPERTY ;
  31.             WIDTH     13,;
  32.             SHADOW   .F.,;
  33.             VALUE    dbCalndr.dNewDate
  34.             
  35.     DEFINE PUSHBUTTON bOK OF m->NewDate AT 3,1;
  36.         PROPERTY ;
  37.             DEFAULT  .T.,;
  38.             TEXT     [&Ok],;
  39.             WIDTH     10,;
  40.             ONCLICK   PrOK
  41.  
  42.     DEFINE PUSHBUTTON bCancel OF m->NewDate AT 3,14;
  43.         PROPERTY ;
  44.             TEXT     [Cancel],;
  45.             WIDTH     10,;
  46.             ONCLICK   PrCancel
  47.                 
  48.