home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / OS2BAS.ZIP / GPIRGN.BI < prev    next >
Text File  |  1989-07-25  |  4KB  |  125 lines
  1. '**************************************************************
  2. '*
  3. '* Include File: GpiRgn.BI
  4. '*
  5. '* Requires:     OS2Def.BI (POINTL type)
  6. '*               PMBase.BI (RECTL type)
  7. '*
  8. '* Description:  Region Manager
  9. '*
  10. '**************************************************************
  11.  
  12. '  options for GpiCombineRegion
  13. CONST CRGNOR       =          1
  14. CONST CRGNCOPY       =          2
  15. CONST CRGNXOR       =          4
  16. CONST CRGNAND       =          6
  17. CONST CRGNDIFF       =          7
  18.  
  19. '  usDirection of returned region data for GpiQueryRegionRects
  20. CONST  RECTDIRLFRTTOPBOT =    1
  21. CONST  RECTDIRRTLFTOPBOT =    2
  22. CONST  RECTDIRLFRTBOTTOP =    3
  23. CONST  RECTDIRRTLFBOTTOP =    4
  24.  
  25. '  control data for GpiQueryRegionRects
  26. TYPE RGNRECT       '  rgnrc
  27.     ircStart AS INTEGER
  28.     crc AS INTEGER
  29.     crcReturned AS INTEGER
  30.     usDirection AS INTEGER
  31. END TYPE
  32.  
  33. '  return code to indicate type of region for GpiCombineRegion and others
  34. CONST  RGNERROR    =   0
  35. CONST  RGNNULL       =   1
  36. CONST  RGNRECT       =   2
  37. CONST  RGNCOMPLEX  =   3
  38.  
  39. '  return codes for GpiPtInRegion
  40. CONST  PRGNERROR    =  0
  41. CONST  PRGNOUTSIDE  =  1
  42. CONST  PRGNINSIDE   =  2
  43.  
  44. '  return codes for GpiRectInRegion
  45. CONST  RRGNERROR    =  0
  46. CONST  RRGNOUTSIDE  =  1
  47. CONST  RRGNPARTIAL  =  2
  48. CONST  RRGNINSIDE   =  3
  49.  
  50. '  return codes for GpiEqualRegion
  51. CONST  EQRGNERROR   =  0
  52. CONST  EQRGNNOTEQUAL =    1
  53. CONST  EQRGNEQUAL   =  2
  54.  
  55. '  error return code for GpiSetRegion
  56. CONST  HRGNERROR   =   -1&
  57.  
  58. ' ** main region functions
  59. DECLARE FUNCTION GpiCreateRegion&( BYVAL HPS AS LONG,_
  60.                     BYVAL ALONG AS LONG,_
  61.                     BYVAL PRECTL AS LONG )
  62.  
  63. DECLARE FUNCTION  GpiSetRegion%( BYVAL HPS AS LONG,_
  64.                  BYVAL HRGN AS LONG,_
  65.                  BYVAL ALONG AS LONG,_
  66.                  BYVAL PRECTL AS LONG )
  67.  
  68. DECLARE FUNCTION  GpiDestroyRegion%( BYVAL HPS AS LONG,_
  69.                      BYVAL HRGN AS LONG )
  70.  
  71. DECLARE FUNCTION  GpiCombineRegion&( BYVAL HPS AS LONG,_
  72.                      BYVAL AHRGN AS LONG,_
  73.                      BYVAL BHRGN AS LONG,_
  74.                      BYVAL CHRGN AS LONG,_
  75.                      BYVAL ALONG AS LONG )
  76.  
  77. DECLARE FUNCTION  GpiEqualRegion&( BYVAL HPS AS LONG,_
  78.                    BYVAL AHRGN AS LONG,_
  79.                    BYVAL BHRGN AS LONG )
  80.  
  81. DECLARE FUNCTION  GpiOffsetRegion%( BYVAL HPS AS LONG,_
  82.                     BYVAL HRGN AS LONG,_
  83.                     BYVAL PPOINTL AS LONG )
  84.  
  85. DECLARE FUNCTION  GpiPtInRegion&( BYVAL HPS AS LONG,_
  86.                   BYVAL HRGN AS LONG,_
  87.                   BYVAL PPOINTL AS LONG )
  88.  
  89. DECLARE FUNCTION  GpiRectInRegion&( BYVAL HPS AS LONG,_
  90.                     BYVAL HRGN AS LONG,_
  91.                     BYVAL PRECTL AS LONG )
  92.  
  93. DECLARE FUNCTION  GpiQueryRegionBox&( BYVAL HPS AS LONG,_
  94.                       BYVAL HRGN AS LONG,_
  95.                       BYVAL PRECTL AS LONG )
  96.  
  97. DECLARE FUNCTION  GpiQueryRegionRects%( BYVAL HPS AS LONG,_
  98.                     BYVAL HRGN AS LONG,_
  99.                     BYVAL APRECTL AS LONG,_
  100.                     BYVAL PRGNRECT AS LONG,_
  101.                     BYVAL BPRECTL AS LONG )
  102.  
  103. DECLARE FUNCTION  GpiPaintRegion&( BYVAL HPS AS LONG,_
  104.                    BYVAL HRGN AS LONG )
  105.  
  106. ' ** clip region functions
  107. DECLARE FUNCTION  GpiSetClipRegion&( BYVAL HPS AS LONG,_
  108.                      BYVAL HRGN AS LONG,_
  109.                      BYVAL PHRGN AS LONG )
  110.  
  111. DECLARE FUNCTION  GpiQueryClipRegion&( BYVAL HPS AS LONG )
  112.  
  113. DECLARE FUNCTION  GpiQueryClipBox&( BYVAL HPS AS LONG,_
  114.                     BYVAL PRECTL AS LONG )
  115.  
  116. DECLARE FUNCTION  GpiIntersectClipRectangle&( BYVAL HPS AS LONG,_
  117.                   BYVAL PRECTL AS LONG )
  118.  
  119. DECLARE FUNCTION GpiExcludeClipRectangle&( BYVAL HPS AS LONG,_
  120.                 BYVAL PRECTL AS LONG )
  121.  
  122. DECLARE FUNCTION  GpiOffsetClipRegion&( BYVAL HPS AS LONG,_
  123.                BYVAL PPOINTL AS LONG )
  124.  
  125.