home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / mod201j.zip / modula2.exe / os2api / gpisegme.def < prev    next >
Text File  |  1994-05-03  |  5KB  |  152 lines
  1. DEFINITION MODULE GPISEGMENTS;
  2.  
  3. (************************************************************************
  4.   OS/2 2.0 interface for Presentation Manager
  5.            GPI Segment Control and Drawing.
  6.  
  7.   Copyright (c) 1992 by Juergen Neuhoff
  8. *************************************************************************)
  9.  
  10. (*$XL+       Modula-2 language extensions: '_' allowed for symbol names *)
  11. (*$CDECL+    C-style procedures                                         *)
  12. (*$A         default alignment for record fields                        *)
  13.  
  14. IMPORT SYSTEM;
  15. FROM   OS2DEF  IMPORT HPS;
  16.  
  17. CONST (* data formats for GpiPutData and GpiGetData *)
  18.   DFORM_NOCONV                  = 0;
  19.   DFORM_S370SHORT               = 1;
  20.   DFORM_PCSHORT                 = 2;
  21.   DFORM_PCLONG                  = 4;
  22.  
  23. CONST (* segment attributes used by GpiSet/QuerySegmentAttrs and others *)
  24.   ATTR_ERROR                    = -1;
  25.   ATTR_DETECTABLE               =  1;
  26.   ATTR_VISIBLE                  =  2;
  27.   ATTR_CHAINED                  =  6;
  28.   ATTR_DYNAMIC                  =  8;
  29.   ATTR_FASTCHAIN                =  9;
  30.   ATTR_PROP_DETECTABLE          = 10;
  31.   ATTR_PROP_VISIBLE             = 11;
  32.  
  33. CONST (* attribute on/off values *)
  34.   ATTR_OFF                      = 0;
  35.   ATTR_ON                       = 1;
  36.  
  37. CONST (* segment priority used by GpiSetSegmentPriority and others *)
  38.   LOWER_PRI                     = -1;
  39.   HIGHER_PRI                    =  1;
  40.  
  41. (*** segment control functions *)
  42.  
  43. PROCEDURE GpiOpenSegment
  44. ( PresSpaceHandle               : HPS;
  45.   Segment                       : LONGINT
  46. )                               : BOOLEAN;
  47.  
  48. PROCEDURE GpiCloseSegment
  49. ( PresSpaceHandle               : HPS
  50. )                               : BOOLEAN;
  51.  
  52. PROCEDURE GpiDeleteSegment
  53. ( PresSpaceHandle               : HPS;
  54.   SegId                         : LONGINT
  55. )                               : BOOLEAN;
  56.  
  57. PROCEDURE GpiQueryInitialSegmentAttrs
  58. ( PresSpaceHandle               : HPS;
  59.   Attribute                     : LONGINT
  60. )                               : LONGINT;
  61.  
  62. PROCEDURE GpiSetInitialSegmentAttrs
  63. ( PresSpaceHandle               : HPS;
  64.   Attribute                     : LONGINT;
  65.   Value                         : LONGINT
  66. )                               : BOOLEAN;
  67.  
  68. PROCEDURE GpiQuerySegmentAttrs
  69. ( PresSpaceHandle               : HPS;
  70.   SegId                         : LONGINT;
  71.   Attribute                     : LONGINT
  72. )                               : LONGINT;
  73.  
  74. PROCEDURE GpiSetSegmentAttrs
  75. ( PresSpaceHandle               : HPS;
  76.   SegId                         : LONGINT;
  77.   Attribute                     : LONGINT;
  78.   Value                         : LONGINT
  79. )                               : BOOLEAN;
  80.  
  81. PROCEDURE GpiQuerySegmentPriority
  82. ( PresSpaceHandle               : HPS;
  83.   RefSegId                      : LONGINT;
  84.   Order                         : LONGINT
  85. )                               : LONGINT;
  86.  
  87. PROCEDURE GpiSetSegmentPriority
  88. ( PresSpaceHandle               : HPS;
  89.   SegId                         : LONGINT;
  90.   RefSegId                      : LONGINT;
  91.   Order                         : LONGINT
  92. )                               : BOOLEAN;
  93.  
  94. PROCEDURE GpiDeleteSegments
  95. ( PresSpaceHandle               : HPS;
  96.   FirstSegment                  : LONGINT;
  97.   LastSegment                   : LONGINT
  98. )                               : BOOLEAN;
  99.  
  100. PROCEDURE GpiQuerySegmentNames
  101. ( PresSpaceHandle               : HPS;
  102.   FirstSegId                    : LONGINT;
  103.   LastSegId                     : LONGINT;
  104.   Max                           : LONGINT;
  105.   VAR SegIds                    : ARRAY OF LONGINT
  106. )                               : LONGINT;
  107.  
  108. (*** draw functions for segments *)
  109.  
  110. PROCEDURE GpiGetData
  111. ( PresSpaceHandle               : HPS;
  112.   SegId                         : LONGINT;
  113.   VAR Offset                    : LONGINT;
  114.   Format                        : LONGINT;
  115.   Length                        : LONGINT;
  116.   VAR Data                      : ARRAY OF SYSTEM.BYTE
  117. )                               : LONGINT;
  118.  
  119. PROCEDURE GpiPutData
  120. ( PresSpaceHandle               : HPS;
  121.   Format                        : LONGINT;
  122.   VAR Length                    : LONGINT;
  123.   VAR Data                      : ARRAY OF SYSTEM.BYTE
  124. )                               : LONGINT;
  125.  
  126. PROCEDURE GpiDrawChain
  127. ( PresSpaceHandle               : HPS
  128. )                               : BOOLEAN;
  129.  
  130. PROCEDURE GpiDrawFrom
  131. ( PresSpaceHandle               : HPS;
  132.   FirstSegment                  : LONGINT;
  133.   LastSegment                   : LONGINT
  134. )                               : BOOLEAN;
  135.  
  136. PROCEDURE GpiDrawSegment
  137. ( PresSpaceHandle               : HPS;
  138.   Segment                       : LONGINT
  139. )                               : BOOLEAN;
  140.  
  141. PROCEDURE GpiDrawDynamics
  142. ( PresSpaceHandle               : HPS
  143. )                               : BOOLEAN;
  144.  
  145. PROCEDURE GpiRemoveDynamics
  146. ( PresSpaceHandle               : HPS;
  147.   FirstSegId                    : LONGINT;
  148.   LastSegId                     : LONGINT
  149. )                               : BOOLEAN;
  150.  
  151. END GPISEGMENTS.
  152.