home *** CD-ROM | disk | FTP | other *** search
/ DOS Wares / doswares.zip / doswares / DATABASE / DBASE5 / CUA_SAMP.ZIP / SELDATE.DFM < prev    next >
Encoding:
Text File  |  1994-06-24  |  3.1 KB  |  112 lines
  1.  
  2. *.............................................................................
  3. *
  4. *   Program Name: SELDATE.DFM         Copyright: Borland International
  5. *   Date Created: 28 Mar 94            Language: dBASE 5.0
  6. *   Time Created: 13:05:05               Author: Borland dBASE R&D
  7. *   /brief/library.src
  8. *.............................................................................
  9.  
  10.     DEFINE FORM SelDate;
  11.         PROPERTY ;
  12.             HELPFILE "DBASE1.HLP",;
  13.             HELPID   "20513",;
  14.             TOP       dbCalndr.Top  +  4,;
  15.             LEFT      dbCalndr.Left + 10,;
  16.             HEIGHT    17,;
  17.             WIDTH     29,;
  18.             TEXT      [Date Format];
  19.             CUSTOM;
  20.                 lFlag .F.
  21.                 
  22.     DEFINE TEXT cT1 OF m->SelDate AT 1,2;
  23.         PROPERTY ;
  24.             TEXT  [Select Date Format]
  25.  
  26.     DEFINE RADIOBUTTON r1 OF m->SelDate AT 3,2;
  27.         PROPERTY ;
  28.             TEXT   [MM/DD/YY],;
  29.             GROUP  .T.,;
  30.             SHADOW .F.,;
  31.             WIDTH   23,;
  32.             VALUE  .T.
  33.  
  34.     DEFINE RADIOBUTTON r2 OF m->SelDate AT 4,2;
  35.         PROPERTY ;
  36.             TEXT   [YY.MM.DD],;
  37.             GROUP  .F.,;
  38.             SHADOW .F.,;
  39.             WIDTH   23,;
  40.             VALUE  .F.
  41.  
  42.     DEFINE RADIOBUTTON r3 OF m->SelDate AT 5,2;
  43.         PROPERTY ;
  44.             TEXT   [DD/MM/YY],;
  45.             GROUP  .F.,;
  46.             SHADOW .F.,;
  47.             WIDTH   23,;
  48.             VALUE  .F.
  49.                     
  50.     DEFINE RADIOBUTTON r4 OF m->SelDate AT 6,2;
  51.         PROPERTY ;
  52.             TEXT   [DD.MM.YY],;
  53.             GROUP  .F.,;
  54.             SHADOW .F.,;                        
  55.             WIDTH   23,;
  56.             VALUE  .F.
  57.             
  58.     DEFINE RADIOBUTTON r5 OF m->SelDate AT 7,2;
  59.         PROPERTY ;
  60.             TEXT   [DD-MM-YY],;
  61.             GROUP  .F.,;
  62.             SHADOW .F.,;
  63.             WIDTH   23,;
  64.             VALUE  .F.
  65.             
  66.     DEFINE RADIOBUTTON r6 OF m->SelDate AT 8,2;
  67.         PROPERTY ;
  68.             TEXT   [YY/MM/DD],;
  69.             GROUP  .F.,;
  70.             SHADOW .F.,;
  71.             WIDTH   23,;
  72.             VALUE  .F.
  73.             
  74.     DEFINE RADIOBUTTON r7 OF m->SelDate AT 9,2;
  75.         PROPERTY ;
  76.             TEXT   [MM-DD-YY],;
  77.             GROUP  .F.,;
  78.             SHADOW .F.,;
  79.             WIDTH   23,;
  80.             VALUE  .F.
  81.             
  82.     DEFINE RADIOBUTTON r8 OF m->SelDate AT 10,2;
  83.         PROPERTY ;
  84.             TEXT   MDY({01/02/99}),;
  85.             GROUP  .F.,;
  86.             SHADOW .F.,;
  87.             WIDTH   23,;
  88.             VALUE  .F.               
  89.             
  90.     DEFINE RADIOBUTTON r9 OF m->SelDate AT 11,2;
  91.         PROPERTY ;
  92.             TEXT   LTRIM(DMY({01/02/99})),;
  93.             GROUP  .F.,;
  94.             SHADOW .F.,;
  95.             WIDTH   23,;
  96.             VALUE  .F.               
  97.             
  98.     DEFINE PUSHBUTTON b1 OF m->SelDate AT 13,2;
  99.         PROPERTY ;
  100.             DEFAULT .T.,;
  101.             TEXT    [&Ok],;
  102.             WIDTH    10,;
  103.             ONCLICK  Pr1OK
  104.  
  105.     DEFINE PUSHBUTTON b2 OF m->SelDate AT 13,15;
  106.         PROPERTY ;
  107.             TEXT    [Cancel],;
  108.             WIDTH    10,;
  109.             ONCLICK  Pr1Cancel
  110.  
  111.  
  112.