home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / mod201j.zip / modula2.exe / os2api / wppower.def < prev    next >
Text File  |  1994-05-24  |  4KB  |  155 lines
  1. DEFINITION MODULE WPPOWER;
  2.  
  3. (***************************************************************************
  4.   OS/2 2.1 Workplace class interface for WPPower;
  5.  
  6.   Copyright (c) 1994 by Juergen Neuhoff
  7. ****************************************************************************)
  8.  
  9. (*$XL+       Modula-2 language extensions: '_' allowed for symbol names *)
  10. (*$CDECL+    C-style procedures                                         *)
  11. (*$A         default alignment for record fields                        *)
  12.  
  13. IMPORT SOM;
  14. IMPORT WPABS;
  15. IMPORT OS2DEF;
  16.  
  17. TYPE PSOMClass              = SOM.PSOMClass;
  18. TYPE INTEGER4               = SOM.INTEGER4;
  19. TYPE somMToken              = SOM.somMToken;
  20. TYPE somDToken              = SOM.somDToken;
  21. TYPE somMethodProc          = SOM.somMethodProc;
  22. TYPE PWPPower               = POINTER TO WPPower;
  23. TYPE PM_WPPower             = POINTER TO M_WPPower;
  24.  
  25. (************************************************************************
  26.   Additional TYPE- and CONST-declarations supporting WPPower
  27. *************************************************************************)
  28.  
  29. TYPE HWND                   = OS2DEF.HWND;
  30.  
  31. (*************************************************************************
  32.   SOM class API for WPPower, including type-bound procedures
  33. **************************************************************************)
  34.  
  35. CONST
  36.   WPPower_MajorVersion     = 1;
  37.   WPPower_MinorVersion     = 2;
  38.  
  39. TYPE
  40.   WPPowerClassDataStructure   = RECORD
  41.     classObject                 : PSOMClass;
  42.     wpChangePowerState          : somMToken;
  43.     wpSetPowerManagement        : somMToken;
  44.     wpQueryPowerManagement      : somMToken;
  45.     wpSetPowerConfirmation      : somMToken;
  46.     wpQueryPowerConfirmation    : somMToken;
  47.     wpAddPowerPage              : somMToken;
  48.     wpAddPowerViewPage          : somMToken;
  49.     wpSetAutoRefresh            : somMToken;
  50.     wpQueryAutoRefresh          : somMToken;
  51.     wpQueryRefreshRate          : somMToken;
  52.     wpSetRefreshRate            : somMToken;
  53.     wpQueryEventSemaphore       : somMToken;
  54.     wpSetEventSemaphore         : somMToken;
  55.     wpQueryDefStatusView        : somMToken;
  56.     wpSetDefStatusView          : somMToken;
  57.                                 END;
  58.  
  59. VAR
  60.   WPPowerClassData : WPPowerClassDataStructure;
  61.  
  62. TYPE
  63.   (*$SOM+ *)
  64.   WPPower = RECORD( WPABS.WPAbstract ) END;
  65.   (*$SOM- *)
  66.  
  67.  
  68. PROCEDURE WPPowerNewClass
  69. (
  70.   majorVersion  : INTEGER4;
  71.   minorVersion  : INTEGER4
  72. )               : PSOMClass;
  73.  
  74. PROCEDURE( Self : PWPPower ) wpAddPowerPage
  75. (
  76.   hwndNotebook  : HWND
  77. )               : LONGCARD;
  78.  
  79. PROCEDURE( Self : PWPPower ) wpAddPowerViewPage
  80. (
  81.   hwndNotebook  : HWND
  82. )               : LONGCARD;
  83.  
  84. PROCEDURE( Self : PWPPower ) wpChangePowerState
  85. (
  86.   ulParm1       : LONGCARD;
  87.   ulParm2       : LONGCARD
  88. )               : BOOLEAN;
  89.  
  90. PROCEDURE( Self : PWPPower ) wpQueryAutoRefresh( ) : BOOLEAN;
  91.  
  92. PROCEDURE( Self : PWPPower ) wpQueryDefStatusView( ) : LONGCARD;
  93.  
  94. PROCEDURE( Self : PWPPower ) wpQueryPowerConfirmation( ) : BOOLEAN;
  95.  
  96. PROCEDURE( Self : PWPPower ) wpQueryPowerManagement( ) : BOOLEAN;
  97.  
  98. PROCEDURE( Self : PWPPower ) wpQueryRefreshRate( ) : LONGCARD;
  99.  
  100. PROCEDURE( Self : PWPPower ) wpSetAutoRefresh
  101. (
  102.   fAutoRefresh  : BOOLEAN
  103. );
  104.  
  105. PROCEDURE( Self : PWPPower ) wpSetDefStatusView
  106. (
  107.   ulDefStatus   : LONGCARD
  108. );
  109.  
  110. PROCEDURE( Self : PWPPower ) wpSetPowerConfirmation
  111. (
  112.   fConfirm      : BOOLEAN
  113. );
  114.  
  115. PROCEDURE( Self : PWPPower ) wpSetPowerManagement
  116. (
  117.   fPower        : BOOLEAN
  118. )               : BOOLEAN;
  119.  
  120. PROCEDURE( Self : PWPPower ) wpSetRefreshRate
  121. (
  122.   ulRefreshRate : LONGCARD
  123. )               : BOOLEAN;
  124.  
  125.  
  126. (*************************************************************************
  127.   SOM class API for M_WPPower, including type-bound procedures
  128. **************************************************************************)
  129.  
  130. CONST
  131.   M_WPPower_MajorVersion   = 1;
  132.   M_WPPower_MinorVersion   = 2;
  133.  
  134. TYPE
  135.   M_WPPowerClassDataStructure   = RECORD
  136.     classObject                   : PSOMClass;
  137.                                   END;
  138.  
  139. VAR
  140.   M_WPPowerClassData : M_WPPowerClassDataStructure;
  141.  
  142. TYPE
  143.   (*$SOM+ *)
  144.   M_WPPower = RECORD( WPABS.M_WPAbstract ) END;
  145.   (*$SOM- *)
  146.  
  147.  
  148. PROCEDURE M_WPPowerNewClass
  149. (
  150.   majorVersion : INTEGER4;
  151.   minorVersion : INTEGER4
  152. )              : PSOMClass;
  153.  
  154. END WPPOWER.
  155.