home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / C / BC_502 / SCRPTEXM.PAK / SPPDIR.SPP < prev    next >
Encoding:
Text File  |  1997-05-06  |  555 b   |  19 lines
  1. //--------------------------------------------------------------------------
  2. // Object Scripting
  3. // Copyright (c) 1996, 1997 by Borland International, All Rights Reserved
  4. //
  5. // SPPDIR.SPP: Script Directory. Displays the Script Manager directory.
  6. //
  7. // MAIN FILE: SPPMAN.SPP
  8. //--------------------------------------------------------------------------
  9. print typeid(module());
  10.  
  11. import SppMan;  // Script Manager object.
  12.  
  13. sppdir()
  14. {
  15.   // Invoke the script manager object to display the script directory.
  16.   //
  17.   SppMan.DisplayDirectory();
  18. }
  19.