home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / mod201j.zip / modula2.exe / os2api / gpiseged.def < prev    next >
Text File  |  1994-05-03  |  3KB  |  106 lines
  1. DEFINITION MODULE GPISEGEDITING;
  2.  
  3. (************************************************************************
  4.   OS/2 2.0 interface for Presentation Manager
  5.            GPI Segment Editing via Elements.
  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 (* edit modes used by GpiSet/QueryEditMode *)
  18.   SEGEM_ERROR                 = 0;
  19.   SEGEM_INSERT                = 1;
  20.   SEGEM_REPLACE               = 2;
  21.  
  22. (*** segment editing by element functions *)
  23.  
  24. PROCEDURE GpiBeginElement
  25. ( PresSpaceHandle             : HPS;
  26.   Type                        : LONGINT;
  27.   Desc                        : ARRAY OF CHAR
  28. )                             : BOOLEAN;
  29.  
  30. PROCEDURE GpiEndElement
  31. ( PresSpaceHandle             : HPS
  32. )                             : BOOLEAN;
  33.  
  34. PROCEDURE GpiLabel
  35. ( PresSpaceHandle             : HPS;
  36.   Label                       : LONGINT
  37. )                             : BOOLEAN;
  38.  
  39. PROCEDURE GpiElement
  40. ( PresSpaceHandle             : HPS;
  41.   Type                        : LONGINT;
  42.   Desc                        : ARRAY OF CHAR;
  43.   Length                      : LONGINT;
  44.   VAR Data                    : ARRAY OF SYSTEM.BYTE
  45. )                             : LONGINT;
  46.  
  47. PROCEDURE GpiQueryElement
  48. ( PresSpaceHandle             : HPS;
  49.   Offset                      : LONGINT;
  50.   MaxLength                   : LONGINT;
  51.   VAR Data                    : ARRAY OF SYSTEM.BYTE
  52. )                             : LONGINT;
  53.  
  54. PROCEDURE GpiDeleteElement
  55. ( PresSpaceHandle             : HPS
  56. )                             : BOOLEAN;
  57.  
  58. PROCEDURE GpiDeleteElementRange
  59. ( PresSpaceHandle             : HPS;
  60.   FirstElement                : LONGINT;
  61.   LastElement                 : LONGINT
  62. )                             : BOOLEAN;
  63.  
  64. PROCEDURE GpiDeleteElementsBetweenLabels
  65. ( PresSpaceHandle             : HPS;
  66.   FirstLabel                  : LONGINT;
  67.   LastLabel                   : LONGINT
  68. )                             : BOOLEAN;
  69.  
  70. PROCEDURE GpiQueryEditMode
  71. ( PresSpaceHandle             : HPS
  72. )                             : LONGINT;
  73.  
  74. PROCEDURE GpiSetEditMode
  75. ( PresSpaceHandle             : HPS;
  76.   Mode                        : LONGINT
  77. )                             : BOOLEAN;
  78.  
  79. PROCEDURE GpiQueryElementPointer
  80. ( PresSpaceHandle             : HPS
  81. )                             : LONGINT;
  82.  
  83. PROCEDURE GpiSetElementPointer
  84. ( PresSpaceHandle             : HPS;
  85.   Element                     : LONGINT
  86. )                             : BOOLEAN;
  87.  
  88. PROCEDURE GpiOffsetElementPointer
  89. ( PresSpaceHandle             : HPS;
  90.   Offset                      : LONGINT
  91. )                             : BOOLEAN;
  92.  
  93. PROCEDURE GpiQueryElementType
  94. ( PresSpaceHandle             : HPS;
  95.   VAR Type                    : LONGINT;
  96.   Length                      : LONGINT;
  97.   VAR Data                    : ARRAY OF SYSTEM.BYTE
  98. )                             : LONGINT;
  99.  
  100. PROCEDURE GpiSetElementPointerAtLabel
  101. ( PresSpaceHandle             : HPS;
  102.   Label                       : LONGINT
  103. )                             : BOOLEAN;
  104.  
  105. END GPISEGEDITING.
  106.