home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / AUROR21A.ZIP / CFGOPEN.AML < prev    next >
Encoding:
Text File  |  1995-09-01  |  1.3 KB  |  41 lines
  1. /* ------------------------------------------------------------------ */
  2. /* Macro:        CFGOPEN.AML                                          */
  3. /* Written by:   nuText Systems                                       */
  4. /*                                                                    */
  5. /* Description:  This macro displays a configuration dialog box for   */
  6. /*               open options.                                        */
  7. /* ------------------------------------------------------------------ */
  8.  
  9.   include bootpath "define.aml"
  10.  
  11.   var openopt
  12.   var defextension
  13.  
  14.   // create dialog box
  15.   dialog "Open Options" 48 13 "cp"
  16.  
  17.   // open options group box
  18.   groupbox 'Default Open Options:' 3 2
  19.     (menu ''
  20.        item " ( ) &Full Screen"
  21.        item " ( ) &Maximize"
  22.        item " ( ) Mi&nimize"
  23.        item " ( ) &Cascade"
  24.        item " ( ) &Horizontal Split "
  25.        item " ( ) &Vertical Split"
  26.        item " ( ) Sam&e Window"
  27.      end) '' _OpenOpt 'fznchve'
  28.  
  29.   // default extensions
  30.   field "&Default File Extensions:"   3 11 43 _DefExt
  31.  
  32.   // ok/cancel buttons
  33.   button "O&k"    38 3 8
  34.   button "Cancel" 38 5 8
  35.  
  36.   // display dialogbox
  37.   if (getdialog ref openopt ref defextension) == 'Ok' then
  38.     setobj OpenOpt  openopt       'prf'
  39.     setobj DefExt   defextension  'prf'
  40.   end
  41.