home *** CD-ROM | disk | FTP | other *** search
/ Bila Vrana / BILA_VRANA.iso / 028A / AUROR.ZIP / CFGSAVE.AML < prev    next >
Text File  |  1996-07-17  |  1KB  |  44 lines
  1. //--------------------------------------------------------------------
  2. // The Aurora Editor v3.0, Copyright (C) 1993-1996 nuText Systems
  3. //
  4. // CFGSAVE.AML
  5. // Configuration for Save Options
  6. //--------------------------------------------------------------------
  7.  
  8. include bootpath "define.aml"
  9.  
  10. variable saveopt, backupdir, foldsign, bakext, autoint
  11.  
  12. dialog "Save Options" 61 11 "cp"
  13.  
  14. // save options group box
  15. groupbox 'Save Options:' 3 2
  16.   (menu ''
  17.      item " [ ] &Entab on Save"
  18.      item " [ ] &Trim Trailing Blanks "
  19.      item " [ ] E&xclude Fold Comments "
  20.      item " [ ] Append Ctrl-&Z"
  21.    end) '' _SaveOpt 'etxz'
  22.  
  23. // edit fields
  24. field "Backup &Directory:"        33  2 27 _BackupDir
  25. field "&Fold Comment Signature:"  33  5 27 _FoldSign
  26.  
  27. field "&Backup Extension:   >"  3  9  7 _BackupExt
  28. field "&Autosave Interval:  >"  3 10  7 _AutoSave
  29.  
  30. // ok/cancel buttons
  31. button "O&k"    37  9 8
  32. button "Cancel" 48  9 8
  33.  
  34. // display dialog box
  35. if (getdialog ref saveopt ref backupdir ref foldsign
  36.               ref bakext  ref autoint) == 'Ok' then
  37.   prf.SaveOpt    = saveopt
  38.   prf.BackupDir  = backupdir
  39.   prf.FoldSign   = foldsign
  40.   prf.BackupExt  = bakext
  41.   prf.AutoSave   = autoint
  42.   sendobject "edit" "autosave" autoint
  43. end
  44.