applications/rnote/source/rnotedistribute.ring

   1 # The Ring Notepad Application (RNote)
   2 # Author : Mahmoud Fayed <msfclipper@yahoo.com>
   3
   4 class RNoteDistribute
   5
   6         func Distribute nOption
   7                 if cActiveFileName = Null return Nofileopened() ok
   8                 Save()
   9                 cAppToRun = exefolder()+"/ring2exe"
  10                 cPara = cActiveFileName
  11                 switch nOption
  12                         on 1    # ringo
  13                                 cAppToRun = exefolder()+"/ring"
  14                                 cPara += ",-go,-norun"
  15                         on 2    # exe
  16                                 cPara += ",-static"
  17                         on 3    # dist allruntime
  18                                 cPara += ",-dist,-allruntime"
  19                         on 4    # dist allruntime gui
  20                                 cPara += ",-dist,-allruntime,-gui"
  21                         on 5    # ringqt
  22                                 cPara += ",-dist,-qt,-gui"
  23                         on 6    # ringallegro
  24                                 cPara += ",-dist,-allegro,-freeglut,-opengl,-gui"
  25                         on 7    # qt project
  26                                 cPara += ",-dist,-allruntime,-gui,-mobileqt"
  27                 off
  28                 oDockOutputWindow { show() raise() }
  29                 oProcessEditbox.setplaintext("")
  30                 chdir(JustFilePath(cActiveFileName))
  31                 oProcess = RunProcess(cAppToRun,cPara,cGetProcessData)
  32                 OSFilesManager()
  33                 chdir(exefolder())
  34