home *** CD-ROM | disk | FTP | other *** search
/ The Developer Connection…ice Driver Kit for OS/2 3 / DEV3-D1.ISO / source / tlktbeta / samples / wpstutor / wpstutor.csc < prev    next >
Encoding:
Text File  |  1993-07-13  |  30.5 KB  |  1,050 lines

  1. /******************************************************************************
  2. *
  3. *  Module Name: WPSTUTOR
  4. *
  5. *  Description: OS/2 Work Place Shell Sample Program
  6. *
  7. *               This class subclasses the WPDataFile class.  Most WPS
  8. *               instance and class methods are overridden to invoke
  9. *               'DisplayMethodInfo'.  This function uses a named pipe
  10. *               to communicate with the 'Show Method Description'
  11. *               (SHOWDESC.EXE) program, which displays the name and a
  12. *               description of the method that invoked
  13. *               'DisplayMethodInfo'.
  14. *
  15. *  Copyright (C) 1993 IBM Corporation
  16. *
  17. *      DISCLAIMER OF WARRANTIES.  The following [enclosed] code is
  18. *      sample code created by IBM Corporation. This sample code is not
  19. *      part of any standard or IBM product and is provided to you solely
  20. *      for  the purpose of assisting you in the development of your
  21. *      applications.  The code is provided "AS IS", without
  22. *      warranty of any kind.  IBM shall not be liable for any damages
  23. *      arising out of your use of the sample code, even if they have been
  24. *      advised of the possibility of such damages.                                                    *
  25. *
  26. ******************************************************************************/
  27.  
  28. ###   Note: The header preceding this comment will be emitted in all files.
  29. ###
  30. ###         Any comments to go public should be preceded with '--'
  31. ###         Any comments to remain private should be preceded with '#'
  32.  
  33. #******************************************************************************
  34. #   Include the class definition file for the parent class
  35. #******************************************************************************
  36. include <wpdataf.sc>
  37.  
  38. #******************************************************************************
  39. #   Define the new class
  40. #******************************************************************************
  41. class: WPSTutorial,                      # Class name
  42.        file stem       = wpstutor,       # Name for SOM-generated files
  43.        function prefix = wpstut_,        # Method function name prefix
  44.        classprefix     = wpstutM_,       # Class method name prefix
  45.        major version   = 1,
  46.        minor version   = 1,
  47.        local;                            # Use "" for include files
  48.  
  49. --
  50. -- CLASS: WPSTutorial
  51. --
  52. -- CLASS HIERARCHY:
  53. --
  54. --     SOMObject
  55. --       └── WPObject
  56. --             └── WPFileSystem
  57. --                   └── WPDataFile
  58. --                         └── WPSTutorial
  59. --
  60. -- DESCRIPTION:
  61. --
  62. --    This is the sample WPS tutorial object class.  This class subclasses
  63. --    the WPDataFile class.  Most WPS instance and class methods are
  64. --    overridden to invoke 'DisplayMethodInfo'.  This function uses a named
  65. --    pipe to communicate with the 'Show Method Description' (SHOWDESC.EXE)
  66. --    program, which displays the name and a description of the method that
  67. --    invoked 'DisplayMethodInfo'.
  68. --
  69. --    An instance of this class can be created as a Workplace object.
  70. --
  71.  
  72. #******************************************************************************
  73. #   Specify the parent class
  74. #******************************************************************************
  75.  
  76. parent: WPDataFile;
  77.  
  78. #******************************************************************************
  79. #   Specify the release order of new methods.  This ensures binary
  80. #   compatability if we change the order of our methods in .c and .csc files.
  81. #******************************************************************************
  82.  
  83. release order: DisplayTitleInfo,
  84.                clsQueryModuleHandle;
  85.  
  86. #******************************************************************************
  87. #   Passthru PRIVATE definitions to the .ph file
  88. #******************************************************************************
  89. passthru: C.ph;
  90.  
  91. /*
  92. **  The following structure is used to store window specific data
  93. **  and a pointer to the object that created the window.
  94. **
  95. **  This structure is allocated when the Client window is created.
  96. **  This allows us to pass the *somSelf pointer and use it in our window
  97. **  and dialog procedures (the system only passes this pointer to
  98. **  methods).
  99. */
  100.  
  101. typedef struct _WINDOWDATA
  102. {
  103.    USHORT       cb;            /* size of this structure */
  104.    WPSTutorial  *somSelf;       /* pointer to this instance */
  105.    USEITEM      UseItem;       /* global class usage information */
  106.    VIEWITEM     ViewItem;      /* global class view information */
  107. } WINDOWDATA;
  108. typedef WINDOWDATA *PWINDOWDATA;
  109.  
  110. /*
  111. **  Private debug helpers go here.  They can be enabled or disabled by
  112. **  defining DEBUG as a compiler directive.
  113. */
  114. #if defined(DEBUG)
  115.  
  116.    #define DebugBox(title, text) \
  117.                                  \
  118.               WinMessageBox(     \
  119.                  HWND_DESKTOP,   \
  120.                  HWND_DESKTOP,   \
  121.                  (PSZ) text,     \
  122.                  (PSZ) title,    \
  123.                  20,             \
  124.                  MB_OK | MB_INFORMATION | MB_MOVEABLE)
  125. #else
  126.  
  127.    #define DebugBox(title, text)   /* do nothing if not debugging */
  128.  
  129. #endif
  130.  
  131. endpassthru;
  132.  
  133. #******************************************************************************
  134. #   Passthru IMPLEMENTATION definitions to the .ih file
  135. #******************************************************************************
  136. passthru: C.ih;
  137.  
  138. #define INCL_WIN
  139. #define INCL_DOS
  140. #define INCL_WPCLASS
  141.  
  142. #include <os2.h>
  143. #include <stdlib.h>
  144. #include <string.h>
  145.  
  146. /*
  147. **   The following user-defined Popup menu items (ID_xxx) should be higher
  148. **   than WPMENUID_USER.
  149. **
  150. **   The ID_OPENMENU will become a submenu of the system's popup open menu
  151. **   id, WPMENUID_OPEN.
  152. */
  153. #define ID_OPENMENU     (WPMENUID_USER+1)   /* "Open" item in context menu   */
  154. #define IDM_OPENTUT     (WPMENUID_USER+2)   /* "Open tutorial" item added    */
  155.                                             /*   to "Open" menu              */
  156. #define ID_ICON         101                 /* Icon for the WPSTutorial class*/
  157.  
  158. /*
  159. **  Window IDs
  160. */
  161. #define ID_FRAME        3000                /* Client window ID for the      */
  162.                                             /*   "open" view                 */
  163. /*
  164. **  Unique view IDs
  165. */
  166. #define OPEN_TUTORIAL   ID_OPENMENU         /* "Open tutorial" view ID       */
  167.  
  168. endpassthru;
  169.  
  170. #******************************************************************************
  171. #   Passthru PUBLIC definitions to the .h file
  172. #******************************************************************************
  173. passthru: C.h;
  174.  
  175. endpassthru;
  176.  
  177. #******************************************************************************
  178. #   Define instance data
  179. #******************************************************************************
  180. # data:
  181.  
  182. #******************************************************************************
  183. #   Define new methods
  184. #******************************************************************************
  185. methods:
  186.  
  187. HWND DisplayTitleInfo();
  188. --
  189. -- METHOD: DisplayTitleInfo                               ( ) PRIVATE
  190. --                                                        (X) PUBLIC
  191. -- DESCRIPTION:
  192. --
  193. --   This method handles the processing of the "Open tutorial" menu item
  194. --   in the "Open" menu of the object's context menu.  The method creates a
  195. --   PM window in order to display the (backwards) title of the object in
  196. --   the window's title bar.
  197. --
  198. -- RETURN:
  199. --
  200. --   HWND - Handle to the window created
  201. --
  202.  
  203. #******************************************************************************
  204. #   Specify methods being overridden
  205. #******************************************************************************
  206.  
  207.  
  208. override wpAddFileMenuPage;
  209. --
  210. --  METHOD: wpAddFileMenuPage                              ( ) PRIVATE
  211. --                                                         (X) PUBLIC
  212. --  DESCRIPTION:
  213. --
  214. --     This method is overridden to invoke 'DisplayMethodInfo'.
  215. --
  216.  
  217. override wpAddFileTypePage;
  218. --
  219. --  METHOD: wpAddFileTypePage                              ( ) PRIVATE
  220. --                                                         (X) PUBLIC
  221. --  DESCRIPTION:
  222. --
  223. --     This method is overridden to invoke 'DisplayMethodInfo'.
  224. --
  225.  
  226. override wpAddFile1Page;
  227. --
  228. --  METHOD: wpAddFile1Page                                 ( ) PRIVATE
  229. --                                                         (X) PUBLIC
  230. --  DESCRIPTION:
  231. --
  232. --     This method is overridden to invoke 'DisplayMethodInfo'.
  233. --
  234.  
  235. override wpAddFile2Page;
  236. --
  237. --  METHOD: wpAddFile2Page                                 ( ) PRIVATE
  238. --                                                         (X) PUBLIC
  239. --  DESCRIPTION:
  240. --
  241. --     This method is overridden to invoke 'DisplayMethodInfo'.
  242. --
  243.  
  244. override wpAddFile3Page;
  245. --
  246. --  METHOD: wpAddFile3Page                                 ( ) PRIVATE
  247. --                                                         (X) PUBLIC
  248. --  DESCRIPTION:
  249. --
  250. --     This method is overridden to invoke 'DisplayMethodInfo'.
  251. --
  252.  
  253. override wpAddObjectGeneralPage;
  254. --
  255. --  METHOD: wpAddObjectGeneralPage                         ( ) PRIVATE
  256. --                                                         (X) PUBLIC
  257. --  DESCRIPTION:
  258. --
  259. --     This method is overridden to invoke 'DisplayMethodInfo'.
  260. --
  261.  
  262. override wpAddSettingsPages;
  263. --
  264. --  METHOD: wpAddSettingsPages                             ( ) PRIVATE
  265. --                                                         (X) PUBLIC
  266. --  DESCRIPTION:
  267. --
  268. --     This method is overridden to invoke 'DisplayMethodInfo'.
  269. --
  270.  
  271. override wpAddToObjUseList;
  272. --
  273. --  METHOD: wpAddToObjUseList                              ( ) PRIVATE
  274. --                                                         (X) PUBLIC
  275. --  DESCRIPTION:
  276. --
  277. --     This method is overridden to invoke 'DisplayMethodInfo'.
  278. --
  279.  
  280. override wpAllocMem;
  281. --
  282. --  METHOD: wpAllocMem                                     ( ) PRIVATE
  283. --                                                         (X) PUBLIC
  284. --  DESCRIPTION:
  285. --
  286. --     This method is overridden to invoke 'DisplayMethodInfo'.
  287. --
  288.  
  289. override wpClose;
  290. --
  291. --  METHOD: wpClose                                        ( ) PRIVATE
  292. --                                                         (X) PUBLIC
  293. --  DESCRIPTION:
  294. --
  295. --    This method is overridden to invoke 'DisplayMethodInfo'.
  296. --
  297.  
  298. override wpCopiedFromTemplate;
  299. --
  300. --  METHOD: wpCopiedFromTemplate                           ( ) PRIVATE
  301. --                                                         (X) PUBLIC
  302. --  DESCRIPTION:
  303. --
  304. --    This method is overridden to invoke 'DisplayMethodInfo'.
  305. --
  306.  
  307. override wpCopyObject;
  308. --
  309. --  METHOD: wpCopyObject                                   ( ) PRIVATE
  310. --                                                         (X) PUBLIC
  311. --  DESCRIPTION:
  312. --
  313. --    This method is overridden to invoke 'DisplayMethodInfo'.
  314. --
  315.  
  316. override wpCreateFromTemplate;
  317. --
  318. --  METHOD: wpCreateFromTemplate                           ( ) PRIVATE
  319. --                                                         (X) PUBLIC
  320. --  DESCRIPTION:
  321. --
  322. --    This method is overridden to invoke 'DisplayMethodInfo'.
  323. --
  324.  
  325. override wpCreateShadowObject;
  326. --
  327. --  METHOD: wpCreateShadowObject                           ( ) PRIVATE
  328. --                                                         (X) PUBLIC
  329. --  DESCRIPTION:
  330. --
  331. --    This method is overridden to invoke 'DisplayMethodInfo'.
  332. --
  333.  
  334. override wpDelete;
  335. --
  336. --  METHOD: wpDelete                                       ( ) PRIVATE
  337. --                                                         (X) PUBLIC
  338. --  DESCRIPTION:
  339. --
  340. --    This method is overridden to invoke 'DisplayMethodInfo'.
  341. --
  342.  
  343. override wpDeleteFromObjUseList;
  344. --
  345. --  METHOD: wpDeleteFromObjUseList                         ( ) PRIVATE
  346. --                                                         (X) PUBLIC
  347. --  DESCRIPTION:
  348. --
  349. --    This method is overridden to invoke 'DisplayMethodInfo'.
  350. --
  351.  
  352. override wpDoesObjectMatch;
  353. --
  354. --  METHOD: wpDoesObjectMatch                              ( ) PRIVATE
  355. --                                                         (X) PUBLIC
  356. --  DESCRIPTION:
  357. --
  358. --    This method is overridden to invoke 'DisplayMethodInfo'.
  359. --
  360.  
  361. override wpDraggedOverObject;
  362. --
  363. --  METHOD: wpDraggedOverObject                            ( ) PRIVATE
  364. --                                                         (X) PUBLIC
  365. --  DESCRIPTION:
  366. --
  367. --    This method is overridden to invoke 'DisplayMethodInfo'.
  368. --
  369.  
  370. override wpDragOver;
  371. --
  372. --  METHOD: wpDragOver                                     ( ) PRIVATE
  373. --                                                         (X) PUBLIC
  374. --  DESCRIPTION:
  375. --
  376. --    This method is overridden to invoke 'DisplayMethodInfo'.
  377. --
  378.  
  379. override wpDrop;
  380. --
  381. --  METHOD: wpDrop                                         ( ) PRIVATE
  382. --                                                         (X) PUBLIC
  383. --  DESCRIPTION:
  384. --
  385. --    This method is overridden to invoke 'DisplayMethodInfo'.
  386. --
  387.  
  388. override wpDroppedOnObject;
  389. --
  390. --  METHOD: wpDroppedOnObject                              ( ) PRIVATE
  391. --                                                         (X) PUBLIC
  392. --  DESCRIPTION:
  393. --
  394. --    This method is overridden to invoke 'DisplayMethodInfo'.
  395. --
  396.  
  397. override wpEndConversation;
  398. --
  399. --  METHOD: wpEndConversation                              ( ) PRIVATE
  400. --                                                         (X) PUBLIC
  401. --  DESCRIPTION:
  402. --
  403. --    This method is overridden to invoke 'DisplayMethodInfo'.
  404. --
  405.  
  406. override wpFilterPopupMenu;
  407. --
  408. --  METHOD: wpFilterPopupMenu                              ( ) PRIVATE
  409. --                                                         (X) PUBLIC
  410. --  DESCRIPTION:
  411. --
  412. --    This method is overridden to invoke 'DisplayMethodInfo'.
  413. --
  414.  
  415. override wpFindUseItem;
  416. --
  417. --  METHOD: wpFindUseItem                                  ( ) PRIVATE
  418. --                                                         (X) PUBLIC
  419. --  DESCRIPTION:
  420. --
  421. --    This method is overridden to invoke 'DisplayMethodInfo'.
  422. --
  423.  
  424. override wpFormatDragItem;
  425. --
  426. --  METHOD: wpFormatDragItem                               ( ) PRIVATE
  427. --                                                         (X) PUBLIC
  428. --  DESCRIPTION:
  429. --
  430. --    This method is overridden to invoke 'DisplayMethodInfo'.
  431. --
  432.  
  433. override wpFree;
  434. --
  435. --  METHOD: wpFree                                         ( ) PRIVATE
  436. --                                                         (X) PUBLIC
  437. --  DESCRIPTION:
  438. --
  439. --    This method is overridden to disconnect and close the named pipe
  440. --    created to communicate with the 'Show Method Description'
  441. --    (SHOWDESC.EXE) program.  This method also kills that program.
  442. --
  443.  
  444. override wpFreeMem;
  445. --
  446. --  METHOD: wpFreeMem                                      ( ) PRIVATE
  447. --                                                         (X) PUBLIC
  448. --  DESCRIPTION:
  449. --
  450. --    This method is overridden to invoke 'DisplayMethodInfo'.
  451. --
  452.  
  453. override wpHide;
  454. --
  455. --  METHOD: wpHide                                         ( ) PRIVATE
  456. --                                                         (X) PUBLIC
  457. --  DESCRIPTION:
  458. --
  459. --    This method is overridden to invoke 'DisplayMethodInfo'.
  460. --
  461.  
  462. override wpInitData;
  463. --
  464. --  METHOD: wpInitData                                     ( ) PRIVATE
  465. --                                                         (X) PUBLIC
  466. --  DESCRIPTION:
  467. --
  468. --    This method is overridden to invoke 'DisplayMethodInfo'.
  469. --
  470.  
  471. override wpInsertPopupMenuItems;
  472. --
  473. --  METHOD: wpInsertPopupMenuItems                         ( ) PRIVATE
  474. --                                                         (X) PUBLIC
  475. --  DESCRIPTION:
  476. --
  477. --    This method is overridden to invoke 'DisplayMethodInfo'.
  478. --
  479.  
  480. override wpInsertSettingsPage;
  481. --
  482. --  METHOD: wpInsertSettingsPage                           ( ) PRIVATE
  483. --                                                         (X) PUBLIC
  484. --  DESCRIPTION:
  485. --
  486. --    This method is overridden to invoke 'DisplayMethodInfo'.
  487. --
  488.  
  489. override wpMenuItemSelected;
  490. --
  491. --  METHOD: wpMenuItemSelected                             ( ) PRIVATE
  492. --                                                         (X) PUBLIC
  493. --  DESCRIPTION:
  494. --
  495. --    This method is overridden to invoke 'DisplayMethodInfo'.
  496. --    In addition, this method processes the input from the
  497. --    "Open tutorial" menu item added by this class.
  498. --
  499.  
  500. override wpModifyPopupMenu;
  501. --
  502. -- METHOD: wpModifyPopupMenu                              ( ) PRIVATE
  503. --                                                        (X) PUBLIC
  504. -- DESCRIPTION:
  505. --
  506. --    This method is overridden to invoke 'DisplayMethodInfo'.
  507. --    In addition, this method adds the "Open tutorial" item to the
  508. --    "Open" menu of the object's context menu,
  509. --
  510.  
  511. override wpOpen;
  512. --
  513. --  METHOD: wpOpen                                         ( ) PRIVATE
  514. --                                                         (X) PUBLIC
  515. --  DESCRIPTION:
  516. --
  517. --    This method is overridden to invoke 'DisplayMethodInfo'.
  518. --    In addition, this method displays the current open view for the
  519. --    object.  If no view is open, a new open view is created.
  520. --
  521.  
  522. override wpQueryConfirmations;
  523. --
  524. --  METHOD: wpQueryConfirmations                           ( ) PRIVATE
  525. --                                                         (X) PUBLIC
  526. --  DESCRIPTION:
  527. --
  528. --    This method is overridden to invoke 'DisplayMethodInfo'.
  529. --
  530.  
  531. override wpQueryDefaultView;
  532. --
  533. --  METHOD: wpQueryDefaultView                             ( ) PRIVATE
  534. --                                                         (X) PUBLIC
  535. --  DESCRIPTION:
  536. --
  537. --    This method is overridden to invoke 'DisplayMethodInfo'.
  538. --
  539.  
  540. override wpQueryDetailsData;
  541. --
  542. --  METHOD: wpQueryDetailsData                             ( ) PRIVATE
  543. --                                                         (X) PUBLIC
  544. --  DESCRIPTION:
  545. --
  546. --    This method is overridden to invoke 'DisplayMethodInfo'.
  547. --
  548.  
  549. override wpQueryHandle;
  550. --
  551. --  METHOD: wpQueryHandle                                  ( ) PRIVATE
  552. --                                                         (X) PUBLIC
  553. --  DESCRIPTION:
  554. --
  555. --    This method is overridden to invoke 'DisplayMethodInfo'.
  556. --
  557.  
  558. override wpQueryIcon;
  559. --
  560. --  METHOD: wpQueryIcon                                    ( ) PRIVATE
  561. --                                                         (X) PUBLIC
  562. --  DESCRIPTION:
  563. --
  564. --    This method is overridden to invoke 'DisplayMethodInfo'.
  565. --
  566.  
  567. override wpQueryIconData;
  568. --
  569. --  METHOD: wpQueryIconData                                ( ) PRIVATE
  570. --                                                         (X) PUBLIC
  571. --  DESCRIPTION:
  572. --
  573. --    This method is overridden to invoke 'DisplayMethodInfo'.
  574. --
  575.  
  576. override wpQueryRealName;
  577. --
  578. --  METHOD: wpQueryRealName                                ( ) PRIVATE
  579. --                                                         (X) PUBLIC
  580. --  DESCRIPTION:
  581. --
  582. --    This method is overridden to invoke 'DisplayMethodInfo'.
  583. --
  584.  
  585. override wpQueryStyle;
  586. --
  587. --  METHOD: wpQueryStyle                                   ( ) PRIVATE
  588. --                                                         (X) PUBLIC
  589. --  DESCRIPTION:
  590. --
  591. --    This method is overridden to invoke 'DisplayMethodInfo'.
  592. --
  593.  
  594. override wpQueryTitle;
  595. --
  596. --  METHOD: wpQueryTitle                                   ( ) PRIVATE
  597. --                                                         (X) PUBLIC
  598. --  DESCRIPTION:
  599. --
  600. --    This method is overridden to invoke 'DisplayMethodInfo'.
  601. --
  602.  
  603. override wpQueryType;
  604. --
  605. --  METHOD: wpQueryType                                    ( ) PRIVATE
  606. --                                                         (X) PUBLIC
  607. --  DESCRIPTION:
  608. --
  609. --    This method is overridden to invoke 'DisplayMethodInfo'.
  610. --
  611.  
  612. override wpRegisterView;
  613. --
  614. --  METHOD: wpRegisterView                                 ( ) PRIVATE
  615. --                                                         (X) PUBLIC
  616. --  DESCRIPTION:
  617. --
  618. --    This method is overridden to invoke 'DisplayMethodInfo'.
  619. --
  620.  
  621. override wpRender;
  622. --
  623. --  METHOD: wpRender                                       ( ) PRIVATE
  624. --                                                         (X) PUBLIC
  625. --  DESCRIPTION:
  626. --
  627. --    This method is overridden to invoke 'DisplayMethodInfo'.
  628. --
  629.  
  630. override wpRenderComplete;
  631. --
  632. --  METHOD: wpRenderComplete                               ( ) PRIVATE
  633. --                                                         (X) PUBLIC
  634. --  DESCRIPTION:
  635. --
  636. --    This method is overridden to invoke 'DisplayMethodInfo'.
  637. --
  638.  
  639. override wpRestore;
  640. --
  641. --  METHOD: wpRestore                                      ( ) PRIVATE
  642. --                                                         (X) PUBLIC
  643. --  DESCRIPTION:
  644. --
  645. --    This method is overridden to invoke 'DisplayMethodInfo'.
  646. --
  647.  
  648. override wpRestoreData;
  649. --
  650. --  METHOD: wpRestoreData                                  ( ) PRIVATE
  651. --                                                         (X) PUBLIC
  652. --  DESCRIPTION:
  653. --
  654. --    This method is overridden to invoke 'DisplayMethodInfo'.
  655. --
  656.  
  657. override wpRestoreLong;
  658. --
  659. --  METHOD: wpRestoreLong                                  ( ) PRIVATE
  660. --                                                         (X) PUBLIC
  661. --  DESCRIPTION:
  662. --
  663. --    This method is overridden to invoke 'DisplayMethodInfo'.
  664. --
  665.  
  666. override wpRestoreState;
  667. --
  668. -- METHOD: wpRestoreState                                 ( ) PRIVATE
  669. --                                                        (X) PUBLIC
  670. -- DESCRIPTION:
  671. --
  672. --    This method is overridden to invoke 'DisplayMethodInfo'.
  673. --    In addition, this method queries the title to "force" all views of
  674. --    the object's title to be backwards upon IPL.
  675. --
  676.  
  677. override wpRestoreString;
  678. --
  679. --  METHOD: wpRestoreString                                ( ) PRIVATE
  680. --                                                         (X) PUBLIC
  681. --  DESCRIPTION:
  682. --
  683. --    This method is overridden to invoke 'DisplayMethodInfo'.
  684. --
  685.  
  686. override wpSaveData;
  687. --
  688. --  METHOD: wpSaveData                                     ( ) PRIVATE
  689. --                                                         (X) PUBLIC
  690. --  DESCRIPTION:
  691. --
  692. --    This method is overridden to invoke 'DisplayMethodInfo'.
  693. --
  694.  
  695. override wpSaveDeferred;
  696. --
  697. --  METHOD: wpSaveDeferred                                 ( ) PRIVATE
  698. --                                                         (X) PUBLIC
  699. --  DESCRIPTION:
  700. --
  701. --    This method is overridden to invoke 'DisplayMethodInfo'.
  702. --
  703.  
  704. override wpSaveImmediate;
  705. --
  706. --  METHOD: wpSaveImmediate                                ( ) PRIVATE
  707. --                                                         (X) PUBLIC
  708. --  DESCRIPTION:
  709. --
  710. --    This method is overridden to invoke 'DisplayMethodInfo'.
  711. --
  712.  
  713. override wpSaveLong;
  714. --
  715. --  METHOD: wpSaveLong                                     ( ) PRIVATE
  716. --                                                         (X) PUBLIC
  717. --  DESCRIPTION:
  718. --
  719. --    This method is overridden to invoke 'DisplayMethodInfo'.
  720. --
  721.  
  722. override wpSaveState;
  723. --
  724. --  METHOD: wpSaveState                                    ( ) PRIVATE
  725. --                                                         (X) PUBLIC
  726. --  DESCRIPTION:
  727. --
  728. --    This method is overridden to invoke 'DisplayMethodInfo'.
  729. --
  730.  
  731. override wpSaveString;
  732. --
  733. --  METHOD: wpSaveString                                   ( ) PRIVATE
  734. --                                                         (X) PUBLIC
  735. --  DESCRIPTION:
  736. --
  737. --    This method is overridden to invoke 'DisplayMethodInfo'.
  738. --
  739.  
  740. override wpSetDefaultView;
  741. --
  742. --  METHOD: wpSetDefaultView                               ( ) PRIVATE
  743. --                                                         (X) PUBLIC
  744. --  DESCRIPTION:
  745. --
  746. --    This method is overridden to invoke 'DisplayMethodInfo'.
  747. --
  748.  
  749. override wpSetIcon;
  750. --
  751. --  METHOD: wpSetIcon                                      ( ) PRIVATE
  752. --                                                         (X) PUBLIC
  753. --  DESCRIPTION:
  754. --
  755. --    This method is overridden to invoke 'DisplayMethodInfo'.
  756. --
  757.  
  758. override wpSetIconData;
  759. --
  760. --  METHOD: wpSetIconData                                  ( ) PRIVATE
  761. --                                                         (X) PUBLIC
  762. --  DESCRIPTION:
  763. --
  764. --    This method is overridden to invoke 'DisplayMethodInfo'.
  765. --
  766.  
  767. override wpSetRealName;
  768. --
  769. --  METHOD: wpSetRealName                                  ( ) PRIVATE
  770. --                                                         (X) PUBLIC
  771. --  DESCRIPTION:
  772. --
  773. --    This method is overridden to invoke 'DisplayMethodInfo'.
  774. --
  775.  
  776. override wpSetStyle;
  777. --
  778. --  METHOD: wpSetStyle                                     ( ) PRIVATE
  779. --                                                         (X) PUBLIC
  780. --  DESCRIPTION:
  781. --
  782. --    This method is overridden to invoke 'DisplayMethodInfo'.
  783. --
  784.  
  785.  
  786. override wpSetTitle;
  787. --
  788. --  METHOD: wpSetTitle                                     ( ) PRIVATE
  789. --                                                         (X) PUBLIC
  790. --  DESCRIPTION:
  791. --
  792. --    This method is overridden to invoke 'DisplayMethodInfo'.
  793. --    In addition, this method reverses the title supplied by
  794. --    the user.
  795. --
  796.  
  797. override wpSetType;
  798. --
  799. --  METHOD: wpSetType                                      ( ) PRIVATE
  800. --                                                         (X) PUBLIC
  801. --  DESCRIPTION:
  802. --
  803. --    This method is overridden to invoke 'DisplayMethodInfo'.
  804. --
  805.  
  806.  
  807. override wpSetup;
  808. --
  809. -- METHOD: wpSetup                                        ( ) PRIVATE
  810. --                                                        (X) PUBLIC
  811. -- DESCRIPTION:
  812. --
  813. --    This method is overridden to invoke 'DisplayMethodInfo'.
  814. --
  815.  
  816. override wpSwitchTo;
  817. --
  818. --  METHOD: wpSwitchTo                                     ( ) PRIVATE
  819. --                                                         (X) PUBLIC
  820. --  DESCRIPTION:
  821. --
  822. --    This method is overridden to invoke 'DisplayMethodInfo'.
  823. --
  824.  
  825. override wpUnlockObject;
  826. --
  827. --  METHOD: wpUnlockObject                                 ( ) PRIVATE
  828. --                                                         (X) PUBLIC
  829. --  DESCRIPTION:
  830. --
  831. --    This method is overridden to invoke 'DisplayMethodInfo'.
  832. --
  833.  
  834. override wpUnInitData;
  835. --
  836. --  METHOD: wpUnInitData                                   ( ) PRIVATE
  837. --                                                         (X) PUBLIC
  838. --  DESCRIPTION:
  839. --
  840. --    This method is overridden to invoke 'DisplayMethodInfo'.
  841. --
  842.  
  843.  
  844. #******************************************************************************
  845. #   Define new class methods
  846. #******************************************************************************
  847. HMODULE clsQueryModuleHandle(), class;
  848. --
  849. -- METHOD: clsQueryModuleHandle
  850. --
  851. -- DESCRIPTION:
  852. --
  853. --   This method obtains and returns the module handle for the object class.
  854. --
  855. -- RETURN:
  856. --
  857. --   0        - Unsuccessful execution
  858. --   Non-zero - Module handle
  859. --
  860.  
  861. #******************************************************************************
  862. #   Specify class methods being overridden
  863. #******************************************************************************
  864.  
  865. override wpclsCreateDefaultTemplates, class;
  866. --
  867. -- METHOD: wpclsCreateDefaultTemplates
  868. --
  869. -- DESCRIPTION:
  870. --
  871. --    This method is overridden to invoke 'DisplayMethodInfo'.
  872. --
  873.  
  874. override wpclsFindObjectEnd, class;
  875. --
  876. -- METHOD: wpclsFindObjectEnd
  877. --
  878. -- DESCRIPTION:
  879. --
  880. --    This method is overridden to invoke 'DisplayMethodInfo'.
  881. --
  882.  
  883. override wpclsFindObjectFirst, class;
  884. --
  885. -- METHOD: wpclsFindObjectFirst
  886. --
  887. -- DESCRIPTION:
  888. --
  889. --    This method is overridden to invoke 'DisplayMethodInfo'.
  890. --
  891.  
  892. override wpclsFindObjectNext, class;
  893. --
  894. -- METHOD: wpclsFindObjectNext
  895. --
  896. -- DESCRIPTION:
  897. --
  898. --    This method is overridden to invoke 'DisplayMethodInfo'.
  899. --
  900.  
  901. override wpclsInitData, class;
  902. --
  903. -- METHOD: wpclsInitData
  904. --
  905. -- DESCRIPTION:
  906. --
  907. --    This method is overridden to invoke 'DisplayMethodInfo'.
  908. --    In addition, this method initializes the DLL module handle.
  909. --
  910.  
  911. override wpclsMakeAwake, class;
  912. --
  913. -- METHOD: wpclsMakeAwake
  914. --
  915. -- DESCRIPTION:
  916. --
  917. --    This method is overridden to invoke 'DisplayMethodInfo'.
  918. --
  919.  
  920. override wpclsNew, class;
  921. --
  922. -- METHOD: wpclsNew
  923. --
  924. -- DESCRIPTION:
  925. --
  926. --    This method is overridden to invoke 'DisplayMethodInfo'.
  927. --
  928.  
  929. override wpclsQueryDefaultView, class;
  930. --
  931. -- METHOD: wpclsQueryDefaultView
  932. --
  933. -- DESCRIPTION:
  934. --
  935. --    This method is overridden to invoke 'DisplayMethodInfo'.
  936. --    In addition, this method is overridden to make the default open
  937. --    view of the instances of this class to the "Open tutorial" view.
  938. --
  939.  
  940. override wpclsQueryDetails, class;
  941. --
  942. -- METHOD: wpclsQueryDetails
  943. --
  944. -- DESCRIPTION:
  945. --
  946. --    This method is overridden to invoke 'DisplayMethodInfo'.
  947. --
  948.  
  949. override wpclsQueryDetailsInfo, class;
  950. --
  951. -- METHOD: wpclsQueryDetailsInfo
  952. --
  953. -- DESCRIPTION:
  954. --
  955. --    This method is overridden to invoke 'DisplayMethodInfo'.
  956. --
  957.  
  958. override wpclsQueryFolder, class;
  959. --
  960. -- METHOD: wpclsQueryFolder
  961. --
  962. -- DESCRIPTION:
  963. --
  964. --    This method is overridden to invoke 'DisplayMethodInfo'.
  965. --
  966.  
  967. override wpclsQueryIcon, class;
  968. --
  969. -- METHOD: wpclsQueryIcon
  970. --
  971. -- DESCRIPTION:
  972. --
  973. --    This method is overridden to invoke 'DisplayMethodInfo'.
  974. --
  975.  
  976. override wpclsQueryIconData, class;
  977. --
  978. -- METHOD: wpclsQueryIconData                             ( ) PRIVATE
  979. --                                                        (X) PUBLIC
  980. -- DESCRIPTION:
  981. --
  982. --    This method is overridden to invoke 'DisplayMethodInfo'.
  983. --    In addition, the method is overridden to define the icon
  984. --    for the class.
  985. --
  986.  
  987. override wpclsQueryInstanceFilter, class;
  988. --
  989. -- METHOD: wpclsQueryInstanceFilter
  990. --
  991. -- DESCRIPTION:
  992. --
  993. --    This method is overridden to invoke 'DisplayMethodInfo'.
  994. --
  995.  
  996. override wpclsQueryInstanceType, class;
  997. --
  998. -- METHOD: wpclsQueryInstanceType
  999. --
  1000. -- DESCRIPTION:
  1001. --
  1002. --    This method is overridden to invoke 'DisplayMethodInfo'.
  1003. --
  1004.  
  1005. override wpclsQueryObject, class;
  1006. --
  1007. -- METHOD: wpclsQueryObject
  1008. --
  1009. -- DESCRIPTION:
  1010. --
  1011. --    This method is overridden to invoke 'DisplayMethodInfo'.
  1012. --
  1013.  
  1014. override wpclsQuerySettingsPageSize, class;
  1015. --
  1016. -- METHOD: wpclsQuerySettingsPageSize
  1017. --
  1018. -- DESCRIPTION:
  1019. --
  1020. --    This method is overridden to invoke 'DisplayMethodInfo'.
  1021. --
  1022.  
  1023. override wpclsQueryStyle, class;
  1024. --
  1025. -- METHOD: wpclsQueryStyle
  1026. --
  1027. -- DESCRIPTION:
  1028. --
  1029. --    This method is overridden to invoke 'DisplayMethodInfo'.
  1030. --
  1031.  
  1032. override wpclsQueryTitle, class;
  1033. --
  1034. -- METHOD: wpclsQueryTitle
  1035. --
  1036. -- DESCRIPTION:
  1037. --
  1038. --    This method is overridden to invoke 'DisplayMethodInfo'.
  1039. --
  1040.  
  1041. override wpclsUnInitData, class;
  1042. --
  1043. -- METHOD: wpclsUnInitData
  1044. --
  1045. -- DESCRIPTION:
  1046. --
  1047. --    This method is overridden to invoke 'DisplayMethodInfo'.
  1048. --
  1049.  
  1050.