home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Professional / OS2PRO194.ISO / os2 / wps / system / wpsnewf / wpnewf.csc < prev    next >
Encoding:
Text File  |  1993-10-14  |  1.4 KB  |  55 lines
  1. /*
  2.      New Program object: It closes the parent folder upon launching it
  3.      Written by : Ghassan Salem 
  4. */
  5. include <wpfolder.sc>
  6.  
  7. class: WPNewF,
  8.        external stem   = WPNewF,
  9.        local,
  10.        external prefix = WPNewFX_,
  11.        classprefix     = WPNewFC_,
  12.        major version   = 1,
  13.        minor version   = 1,
  14.        file stem       = WPNewF;
  15.  
  16.  
  17. parent: WPFolder;
  18.  
  19. #release order:
  20.  
  21. passthru: C.ph;
  22.  /* private defs for FileState */
  23. endpassthru;
  24.  
  25. passthru: C.ih;
  26.    #define INCL_WINWINDOWMGR
  27.    #define INCL_WININPUT
  28.    #define INCL_DOSPROCESS
  29.    #define INCL_WINMESSAGEMGR
  30.    #define INCL_WINPROGRAMLIST
  31.    #include <os2.h>
  32.  /* internal definitions */
  33.    #define ID_CLOSEANDR        (WPMENUID_USER+1) /* menus added to popup menu */
  34.    #define IDM_CLOSEANDR       (WPMENUID_USER+2)
  35.  
  36.    #define MYSTR_CLASSNAME      "WPNewF"
  37. endpassthru;
  38.  
  39. passthru: C.h, after;
  40.  /* public defs for FileState */
  41. endpassthru;
  42.  
  43. /* pszMyheader holds (usually) the Message Box Title */
  44. data:
  45.    PSZ   pszMyHeader;
  46.  
  47. methods:
  48. #/*====================================================================*/
  49. #/*                                                                    */
  50. #/* Override wpOpen method                                         */
  51. #/*                                                                    */
  52. #/*====================================================================*/
  53.  
  54.     override wpOpen;
  55.