home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Source Code / C / Applications / UIFlow 1.0.1 / UIFlow Source / CFDFront / TOutput.cp < prev    next >
Encoding:
Text File  |  1992-02-21  |  1.4 KB  |  38 lines  |  [TEXT/MPS ]
  1. #pragma segment Output
  2. //**********************************************************************
  3. //    The TOutput class methods.    
  4. //        this object writes the information to the disk
  5. //        later it the write method can be overriden to write to DTM port
  6. //**********************************************************************
  7. // -----------------------------------------------------------------------------------------
  8. //    Initialize the output object...
  9. //        the default for this object is to perform the standard save task.
  10. // -----------------------------------------------------------------------------------------
  11. void TOutput::IOutput(TDocument * doc, short grid)
  12.     {
  13.     fDocument    = doc;
  14.     fGrid            = grid;
  15.     return;
  16.     }
  17.  
  18. // -----------------------------------------------------------------------------------------
  19. //    Process the Menu Commands
  20. // -----------------------------------------------------------------------------------------
  21. void TOutput::Write(short aRefNum, char * string)
  22.     {}
  23.     
  24. // -----------------------------------------------------------------------------------------
  25. //    Process the Menu Commands
  26. // -----------------------------------------------------------------------------------------
  27. void TFOutput::Write(short aRefNum, char * string)
  28.     {
  29.     long len;
  30.     
  31.     len = (long) strlen(string);
  32.     HLock((Handle) this);
  33.     FSWrite(aRefNum,&len,string);
  34.     HUnlock((Handle) this);
  35.     return;
  36.     }
  37.  
  38.