applications/build/ja-jp/rnote/rnotesettings.ring

   1 # Ring ノートパットアプリケーション (RNote)
   2 # 原作者 : Mahmoud Fayed <msfclipper@yahoo.com>
   3
   4 class RNoteSettings
   5
   6         func SaveSettingsToFile
   7                 SaveCurrentFolder()
   8                 cSettings = "aTextColor = ["+aTextColor[1]+","+aTextColor[2]+","+aTextColor[3]+"]" + nl +
   9                                 "aBackColor = ["+aBackColor[1]+","+aBackColor[2]+","+aBackColor[3]+"]" + nl +
  10                                 "cFont = '" + cFont + "'" + nl +
  11                                 "cWebSite = '" + cWebsite + "'" + nl +
  12                                 "cStartupFolder = '" + cStartupFolder + "'" + nl +
  13                                 "lShowProject = " + oDockProjectFiles.isvisible() + nl +
  14                                 "lShowSourceCode = " + oDockSourceCode.isvisible() + nl +
  15                                 "lShowBrowser = " + oDockWebBrowser.isvisible() + nl +
  16                                 "lShowFunctionsList = " + oDockFunctionsList.isvisible() + nl +
  17                                 "lShowClassesList = " + oDockClassesList.isvisible() + nl +
  18                                 "lShowOutputWindow = " + oDockOutputWindow.isvisible() + nl +
  19                                 "lShowFormDesigner = " + oDockFormDesigner.isvisible() + nl +
  20                                 "nTabSpaces = " + nTabSpaces + nl +
  21                                 "nDefaultStyle = " + nDefaultStyle + nl +
  22                                 "nDefaultMode  = " + nDefaultMode + nl
  23                 cSettings = substr(cSettings,nl,char(13)+char(10))
  24                 write(cSettingsFile,cSettings)
  25
  26         func SaveSettings
  27                 SaveSettingsToFile()
  28                 if lAsktoSave and cTextHash != sha256(textedit1.toplaintext())
  29                         new qmessagebox(win1)
  30                         {
  31                                 setwindowtitle("変更を保存しますか？")
  32                                 settext("変更が保存されていません！")
  33                                 setInformativeText("変更を保存しますか？")
  34                                 setstandardbuttons(QMessageBox_Yes | QMessageBox_No)
  35                                 result = exec()
  36                                 this.win1 {
  37                                 if result = QMessageBox_Yes
  38                                         this.Save()
  39                                 but result = QMessageBox_Cancel
  40                                         return false
  41                                 ok
  42                         }
  43                 }
  44                 ok
  45                 return true
  46
  47         func LoadSettings
  48                 if fexists(cSettingsFile)
  49                         eval(read(cSettingsFile))
  50                 ok
  51
  52         func RestoreSettings
  53                 SetColors()
  54                 SetFont()
  55                 SetWebsite()
  56                 SetWindows()
  57                 SetTabSpaces()
  58                 SelectStyleColor2(nDefaultStyle)
  59
  60         func SetWindows
  61                 if not lShowProject             oDockProjectFiles.close() else oDockProjectFiles.show() ok
  62                 if not lShowSourceCode          oDockSourceCode.close() else oDockSourceCode.show() ok
  63                 if not lShowBrowser             oDockWebBrowser.close() else oDockWebBrowser.show() ok
  64                 if not lShowFunctionsList       oDockFunctionsList.close() else oDockFunctionsList.show() ok
  65                 if not lShowClassesList         oDockClassesList.close() else oDockClassesList.show() ok
  66                 if not lShowOutputWindow        oDockOutputWindow.close() else oDockOutputWindow.show() ok
  67                 if not lShowFormDesigner        oDockFormDesigner.close() else oDockFormDesigner.show() ok
  68