SCClassLibrary/Platform/windows/PsycolliderDocument.sc

   1 /*
   2 The BEGINNINGS of a Document class for psycollider.
   3 Currently has limitations compared to other Document implementations,
   4 doesn't connect to all of psyco's potential.
   5 */
   6 PsycolliderDocument : Document {
   7         var <path,
   8                 <id; // Should be the "windowId" used in psycollider to uniquely identify the window
   9
  10         *initClass{
  11                 Document.implementationClass = PsycolliderDocument;
  12         }
  13
  14         *new { arg title="Untitled", string="", makeListener=false;
  15                 ^super.prBasicNew.initByString(title, string.asString, makeListener);
  16         }
  17         initByString { arg title="Untitled", string="", makeListener=false;
  18                 var tempFile;
  19                 path = "temp_newTextWindow";
  20                 tempFile = File(path, "w");
  21                 tempFile.write(string);
  22                 tempFile.close;
  23                 id = path.openWinTextFile;
  24         }
  25
  26         *findHelpFile { |str|
  27                 ^Help.findHelpFile(str)
  28         }
  29
  30         *postColor_ {
  31         }
  32 }