home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / mod201j.zip / modula2.exe / os2api / gpicorre.def < prev    next >
Text File  |  1994-05-03  |  4KB  |  102 lines
  1. DEFINITION MODULE GPICORRELATION;
  2.  
  3. (************************************************************************
  4.   OS/2 2.0 interface for Presentation Manager
  5.            GPI Picking, Boundary and Correlation.
  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. FROM   OS2DEF  IMPORT HPS, POINTL, RECTL;
  15. FROM   GPIDEF  IMPORT SIZEL;
  16.  
  17. CONST (* options for GpiSetPickApertureSize *)
  18.   PICKAP_DEFAULT                = 0;
  19.   PICKAP_REC                    = 2;
  20.  
  21. CONST (* type of correlation for GpiCorrelateChain *)
  22.   PICKSEL_VISIBLE               = 0;
  23.   PICKSEL_ALL                   = 1;
  24.  
  25. CONST (* return code to indicate correlate hit(s) *)
  26.   GPI_HITS                      = 2;
  27.  
  28.  
  29. (*** picking,  correlation and boundary functions *)
  30.  
  31. PROCEDURE GpiCorrelateChain
  32. ( PresSpaceHandle               : HPS;
  33.   Type                          : LONGINT;
  34.   VAR PickPos                   : POINTL;
  35.   MaxHits                       : LONGINT;
  36.   MaxDepth                      : LONGINT;
  37.   VAR SegTag                    : ARRAY OF LONGINT
  38. )                               : LONGINT;
  39.  
  40. PROCEDURE GpiQueryTag
  41. ( PresSpaceHandle               : HPS;
  42.   VAR Tag                       : LONGINT
  43. )                               : BOOLEAN;
  44.  
  45. PROCEDURE GpiSetTag
  46. ( PresSpaceHandle               : HPS;
  47.   Tag                           : LONGINT
  48. )                               : BOOLEAN;
  49.  
  50. PROCEDURE GpiQueryPickApertureSize
  51. ( PresSpaceHandle               : HPS;
  52.   VAR Size                      : SIZEL
  53. )                               : BOOLEAN;
  54.  
  55. PROCEDURE GpiSetPickApertureSize
  56. ( PresSpaceHandle               : HPS;
  57.   Options                       : LONGINT;
  58.   VAR Size                      : SIZEL
  59. )                               : BOOLEAN;
  60.  
  61. PROCEDURE GpiQueryPickAperturePosition
  62. ( PresSpaceHandle               : HPS;
  63.   VAR Point                     : POINTL
  64. )                               : BOOLEAN;
  65.  
  66. PROCEDURE GpiSetPickAperturePosition
  67. ( PresSpaceHandle               : HPS;
  68.   VAR Point                     : POINTL
  69. )                               : BOOLEAN;
  70.  
  71. PROCEDURE GpiQueryBoundaryData
  72. ( PresSpaceHandle               : HPS;
  73.   VAR Boundary                  : RECTL
  74. )                               : BOOLEAN;
  75.  
  76. PROCEDURE GpiResetBoundaryData
  77. ( PresSpaceHandle               : HPS
  78. )                               : BOOLEAN;
  79.  
  80. PROCEDURE GpiCorrelateFrom
  81. ( PresSpaceHandle               : HPS;
  82.   FirstSegment                  : LONGINT;
  83.   LastSegment                   : LONGINT;
  84.   Type                          : LONGINT;
  85.   VAR PickPos                   : POINTL;
  86.   MaxHit                        : LONGINT;
  87.   MaxDepth                      : LONGINT;
  88.   VAR SegTag                    : ARRAY OF LONGINT
  89. )                               : LONGINT;
  90.  
  91. PROCEDURE GpiCorrelateSegment
  92. ( PresSpaceHandle               : HPS;
  93.   Segment                       : LONGINT;
  94.   Type                          : LONGINT;
  95.   VAR PickPos                   : POINTL;
  96.   MaxHit                        : LONGINT;
  97.   MaxDepth                      : LONGINT;
  98.   VAR SegTag                    : ARRAY OF LONGINT
  99. )                               : LONGINT;
  100.  
  101. END GPICORRELATION.
  102.