home *** CD-ROM | disk | FTP | other *** search
/ Bila Vrana / BILA_VRANA.iso / 028A / AUROR.ZIP / CFGEDIT1.AML < prev    next >
Text File  |  1996-07-17  |  2KB  |  59 lines
  1. //--------------------------------------------------------------------
  2. // The Aurora Editor v3.0, Copyright (C) 1993-1996 nuText Systems
  3. //
  4. // CFGEDIT1.AML
  5. // Configuration for Edit Options 1
  6. //--------------------------------------------------------------------
  7.  
  8. include bootpath "define.aml"
  9.  
  10. variable defset, undosiz, clipname, linestyle
  11.  
  12. // create dialog box
  13. dialog "Edit Options 1" 63 16 "cp"
  14.  
  15. // default edit settings group box
  16. groupbox 'Default Edit Settings:' 3 2
  17.   (menu ''
  18.      item " [ ] &Autoindent"
  19.      item " [ ] &Backup"
  20.      item " [ ] &Draw Mode"
  21.      item " [ ] &Hex View"
  22.      item " [ ] &Insert Mode"
  23.      item " [ ] &Live Word Wrap"
  24.      item " [ ] &Match Character"
  25.      item " [ ] &Smart Tabs"
  26.      item " [ ] &Translate"
  27.      item " [ ] &Undo Enabled"
  28.      item " [ ] &Variable Tabs"
  29.      item " [ ] Standard &Word Wrap"
  30.      item " [ ] Synta&x Highlighting "
  31.    end) '' _DefaultSet "abdhilmstuvwx"
  32.  
  33. // edit fields
  34. field "Undo Si&ze:"        31  2 18 _UndoSize
  35. field "Default &Clipboard:"  31  5 18 _ClipName
  36.  
  37. // default linestyle
  38. groupbox 'Default Line Style:' 31 10
  39.   (menu ''
  40.      item " ( ) &Single              ┌──┐ "
  41.      item " ( ) Double &Horizontal   ╒══╕"
  42.      item " ( ) Double &Vertical     ╓──╖"
  43.      item " ( ) &Double              ╔══╗"
  44.      item " ( ) &Eraser"
  45.    end) '' _LineStyle "01234"
  46.  
  47. // ok/cancel buttons
  48. button "O&k"    53  3 8
  49. button "Cancel" 53  5 8
  50.  
  51. // display dialog box
  52. if (getdialog ref defset ref undosiz ref clipname
  53.               ref linestyle) == 'Ok' then
  54.   prf.DefaultSet = defset
  55.   prf.UndoSize   = undosiz             // requires re-entry
  56.   prf.ClipName   = clipname
  57.   prf.LineStyle  = linestyle
  58. end
  59.