home *** CD-ROM | disk | FTP | other *** search
/ Bila Vrana / BILA_VRANA.iso / 028A / AUROR.ZIP / CFGMISC.AML < prev    next >
Text File  |  1996-07-17  |  2KB  |  51 lines
  1. //--------------------------------------------------------------------
  2. // The Aurora Editor v3.0, Copyright (C) 1993-1996 nuText Systems
  3. //
  4. // CFGMISC.AML
  5. // Configuration for Miscellaneous Editing Options
  6. //--------------------------------------------------------------------
  7.  
  8. include bootpath "define.aml"
  9.  
  10. variable cset, tilesplit, menucursor, namestyle
  11.  
  12. // create dialog box
  13. dialog "Miscellaneous Options" 57 12 "cp"
  14.  
  15. groupbox 'Filename Style:' 3 2
  16.   (menu ''
  17.      item " ( ) &Lowercase    c:\\sample\\filename.ext"
  18.      item " ( ) &Capitalized  C:\\Sample\\Filename.ext"
  19.      item " ( ) &Uppercase    C:\\SAMPLE\\FILENAME.EXT "
  20.      item " ( ) &As-is        c:\\sAMPle\\fileNAME.exT "
  21.    end) '' (if? _NameStyle _NameStyle ' ') "lcu "
  22.  
  23. // hardware cursor on menus
  24. groupbox 'Menu Cursor:' 3 8
  25.   (menu ''
  26.      item " ( ) &Hidden"
  27.      item " ( ) &Insert Size"
  28.      item " ( ) &Overstrike Size "
  29.    end) '' (if? _MenuCursor _MenuCursor 'h') "hio"
  30.  
  31. // default word char set
  32. field "&Default Char Set for Words: "  27 8 28 _CSet
  33.  
  34. // number of tiles before second orthogonal split
  35. field "&Tile Split Threshold:  >"  27 11 5 _TileSplit
  36.  
  37. // ok/cancel buttons
  38. button "O&k"    47  3 8
  39. button "Cancel" 47  5 8
  40.  
  41. // display dialog box
  42. if (getdialog ref namestyle ref menucursor ref cset
  43.               ref tilesplit) == 'Ok' then
  44.   prf.NameStyle  = namestyle
  45.   prf.CSet       = cset
  46.   prf.TileSplit  = tilesplit
  47.   prf.MenuCursor = menucursor
  48.   // change actual menucursor immediately
  49.   setmenucurs menucursor
  50. end
  51.